XE2 GENERIC RECORDS als Funktionsparameter

[daywalker9]

So müsste es aber tun:

Delphi-Quellcode:

type
  TGenRec<TRecordType>=class
  private
    FRecTyp: TRecordType;
  public
    property Rec : TRecordType read FRecTyp write FRecTyp;
  end;

type
  TForm6 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
    procedure doit<T>(rec:TGenRec<T>);
  end;