type
myrecord=record
id:integer;
comment:string;
end;有一过程需要返回该类型数组,长度不定,第一中种都通不过编译
function getmyrecord():array of myrecord;
第二种可以定义,但实现中不能用setlength
procedure getmyrecord(var myrecords:array of myrecord);
begin
setlength(myrecords,10); //出错
end;怎么办?上csdn求助
myrecord=record
id:integer;
comment:string;
end;有一过程需要返回该类型数组,长度不定,第一中种都通不过编译
function getmyrecord():array of myrecord;
第二种可以定义,但实现中不能用setlength
procedure getmyrecord(var myrecords:array of myrecord);
begin
setlength(myrecords,10); //出错
end;怎么办?上csdn求助
解决方案 »
- 高手进啊,小弟不知道咋办
- 新手问题---delphi函数的递归调用
- 软件加密!
- 谁有JwaSocket包中的这个WINDEFINES.INC文件?
- 如何获取相同标题类名,不同路径运行的窗口句柄
- 字符串变量s的值为'111111'#$D#$A怎样把它弄成s的值为'111111'
- 请问怎么动态的在树中增加节点,用TreeView或者ListView,谢谢,重分向谢!
- 我在程序中调用Dll, 在Dll没有执行完之前退出程序,却退不出
- 在delphi中如何将GetLastError的具体错误转换成字符串
- 请问time string 转换成systemtime 如何转换?
- ADO控件如何捕捉Sql存储过程中的错误?在线等待...
- 如何用CopyMemory快速拷贝两个独立的动态数组?
myrecord=record
id:integer;
comment:string;
end;Tmyrecord =array of myrecord;//***************************//procedure getmyrecord(var myrecords:Tmyrecord);
begin
setlength(myrecords,10);
end;
可能查找节点费点事,不过可以逃避返回值啊!