可以使用记录作为方法参数,并且在不隐式声明所述记录的实例的情况下调用它吗？
我想编写这样的代码.
type
TRRec = record
ident : string;
classtype : TClass;
end;
procedure Foo(AClasses : array of TRRec);
Foo([('Button1',TButton),('Lable1',TLabel)]);
我仍然坚持使用Delphi 5.
解决方法
是.几乎.
type
TRRec = record
ident : string;
classtype : TClass;
end;
function r(i: string; c: TClass): TRRec;
begin
result.ident := i;
result.classtype := c;
end;
procedure Foo(AClasses : array of TRRec);
begin
;
end;
// ...
Foo([r('Button1',r('Lable1',TLabel)]);