我想做一个函数,返回的类心是我自定义的record 类型的数组,但是编译通不过啊
unit tjjh;interfaceuses SysUtils;type Jhtb = Record
lushu,luhao,ydcj,ydjj:String;
end;type
Jhbp = Class public
Chejian ,Banci,Mdate,Total:String;
Jhjjs,Jhjjf:String;
Kss,Ksf,Czsj:String;
Kslh:String;
Jxds:Integer;
Chls,Jxsj:array of Integer;
JhtbList:array of Jhtb;
procedure setKslh(lh:String);
function getJhTable():array of Integer; end;
var Jhtber:Jhtb;implementationprocedure Jhbp.setKslh(lh:String);
beginend;
function Jhbp.getJhTable():array of Integer;
beginend;
end.
unit tjjh;interfaceuses SysUtils;type Jhtb = Record
lushu,luhao,ydcj,ydjj:String;
end;type
Jhbp = Class public
Chejian ,Banci,Mdate,Total:String;
Jhjjs,Jhjjf:String;
Kss,Ksf,Czsj:String;
Kslh:String;
Jxds:Integer;
Chls,Jxsj:array of Integer;
JhtbList:array of Jhtb;
procedure setKslh(lh:String);
function getJhTable():array of Integer; end;
var Jhtber:Jhtb;implementationprocedure Jhbp.setKslh(lh:String);
beginend;
function Jhbp.getJhTable():array of Integer;
beginend;
end.
小弟还是初次使用DELPHI ,缺乏的东西还多啊~希望以后想你们学习