Анонимные конструкторы записей в delphi

Можно ли использовать записи в качестве параметра метода и вызывать его без неявного объявления экземпляра указанной записи?

Я хотел бы иметь возможность писать такой код.

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

procedure Foo(AClasses : array of TRRec);

затем вызывая метод, подобный этому или что-то подобное.

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

Я все еще застрял на Delphi 5.

Ответы

Ответ 1

Да. Почти.

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', TButton), r('Lable1', TLabel)]);

Ответ 2

Также возможно работать с массивом const, но это не так гибко, как решение, данное "gangph": (особенно, что вы должны указать размер ([0..1]) массива в объявлении массива. Записи анонимны, массив не является).

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

procedure Foo(AClasses : array of TRRec);
begin
end;

const tt: array [0..1] of TRRec = ((ident:'Button1'; classtype:TButton),
                                   (ident:'Lable1'; classtype:TLabel));

Begin
  Foo(tt);
end.