function GetIdArray(var idArtray:array of integer): boolean;
begin
setLength(idArray,100);
// 上面这句话编译错误
end;请指教
begin
setLength(idArray,100);
// 上面这句话编译错误
end;请指教
解决方案 »
- 哪有Delphi 2009 帮助?
- 请教TabControl的images 的imageindex问题
- 如何读取媒体文件的头信息?
- 菜鸟决心要学Delphi,刚刚订购了几本书。
- DBGrid中显示的(VARBYTES)怎样处理,让它显示原来的中文数据?
- 大家快点帮我呵呵!!!急死了呵!!!(能帮我的马上结帐给分呵!)
- @@@请各位在上海混饭吃的it同仁给我做个见证,前一个老板认为我对不起他,国庆过后,我会把我遇的全部说出来,只列举事实,如有假话,猪
- 结识DELPHI编程朋友~~~~
- 如何把borderstyle:=bsNone的窗体上设一button,点下这button即窗体可以最小化.
- 我在建立一個項目組,並且保存為Projectgroup1後,在打開為什麼會變化呢?
- 谁能给我一个sncCurrency控件,100大洋酬谢!!
- 一个showHint的问题
先声明一个数组 :idArray : array of Integer;
数组本来就是传地址的所以不需要var了
funciton GetIdArray : Boolean;
begin
SetLength(idArray,100);
end;
1:setLength(idArray,100);//idArray与定义不同,改为idArtray;
2:应该改为
type
AA= array of integer;
function GetIdArray(var idArtray:AA): boolean;
begin
setLength(idArtray,100);
end;
ai=array of Integer;function GetIdArray(var idArtray:ai): boolean;
begin
SetLength( idArtray,20);
idArtray[1]:=343; idArtray[2]:=343;
// 上面这句话编译错误
end;procedure TForm1.Button1Click(Sender: TObject);
var
i:ai;
begin
GetIdArray(i);
end;
出的是下面的这个错误:Incompatible types 我按第一种方法去除了 var 还是上面的错误
type
AA= array of integer;
function GetIdArray(var idArtray:AA): boolean;
begin
setLength(idArtray,100);
idArtray[1]:=343; idArtray[2]:=343;end;procedure TForm1.Button2Click(Sender: TObject);
var
i:AA;
begin
GetIdArray(i);
end;
按 u2m(UpToMe) 方法成了。
请问能讲解一下为什么要把 array of integer 定义为新类型才可以呀?
多谢