delphi中的匿名记录构造函数

前端之家收集整理的这篇文章主要介绍了delphi中的匿名记录构造函数前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
可以使用记录作为方法参数,并且在不隐式声明所述记录的实例的情况下调用它吗?

我想编写这样的代码.

type
  TRRec = record
    ident : string;
    classtype : TClass;
  end;

procedure Foo(AClasses : array of TRRec);

然后调用这样的方法或类似的东西.

Foo([('Button1',TButton),('Lable1',TLabel)]);

我仍然坚持使用Delphi 5.

解决方法

@H_403_15@ 是.几乎.
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)]);
原文链接:https://www.f2er.com/delphi/102610.html

猜你在找的Delphi相关文章