动态数组 在DELPHI中动态数组是否要在代码中重新定义它的大小。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 动态数组必须在代码中设定大小,否则它的长度为0,怎么用?SetLength() while pos('*',useDataFileName) > 0 do begin i := Length(ArrayDataFileName); SetLength(ArrayDataFileName,i+1); ArrayDataFileName[i] := copy(useDataFileName,1,pos('*',useDataFileName)); ArrayDataFileName[i] := copy(ArrayDataFileName[i],1,length(ArrayDataFileName[i])-1); useDataFileName := copy(useDataFileName,pos('*',useDataFileName)+1,Length(useDataFileName)-pos('*',useDataFileName)+1); end; i := Length(ArrayDataFileName); SetLength(ArrayDataFileName,i+1); ArrayDataFileName[i] := useDataFileName; var variable_name1 array of String; variable_name2 array[0..20] of String;//也可以直接设置它的长度begin Setlength(variable_name,20);//此数组长度被设置成为20end; 我不知道有没有人用DELPHI7+CORBA做数据库开发? 想挑战难度的快来,如果得到鼠标指针在图片的第几行第几列的像素上? 请教怎样想流程图的问题? StringGrid中每此点击cell时,当前cell的颜色会改变,如何使其保留原来的颜色不变呢? 外行问题! 在dbgrid控件中,当按下ctrl+del 时,是删除意思。我想把这个2个键屏蔽掉,怎么写? bde的bug? 问高手们一个查询语句 如何通过程序判断bde是否连通sql server? 我想得到系统菜单,高手进来…… 如何获取我程序中所有打开的窗体的句柄?我想实现注销功能 有关BDE连oracle接数据库的问题
SetLength()
begin
i := Length(ArrayDataFileName);
SetLength(ArrayDataFileName,i+1);
ArrayDataFileName[i] := copy(useDataFileName,1,pos('*',useDataFileName));
ArrayDataFileName[i] := copy(ArrayDataFileName[i],1,length(ArrayDataFileName[i])-1);
useDataFileName := copy(useDataFileName,pos('*',useDataFileName)+1,Length(useDataFileName)-pos('*',useDataFileName)+1);
end;
i := Length(ArrayDataFileName);
SetLength(ArrayDataFileName,i+1);
ArrayDataFileName[i] := useDataFileName;
variable_name1 array of String;
variable_name2 array[0..20] of String;//也可以直接设置它的长度
begin
Setlength(variable_name,20);//此数组长度被设置成为20
end;