Generic record

[bernhard_LA]

was Delphi auf nicht compiliert

Delphi-Quellcode:

type TRecordTypeA=  ....
     ....
     ...
     ..


// gib mir ein record type 1 zurück 
function testfunction (a : Integer) : TRecordTypeA;  overload; 
//  nun type 2 
function testfunction (a : Integer) : TRecordTypeB;  overload;
//  usw .... 
function testfunction (a : Integer) : TRecordTypeC;  overload;

müsste ich etwas wie

Delphi-Quellcode:

procedure (a : Integer;   var TGenericRecordType<T> );

codieren.


bzw.

Zitat:

da aber keine generischen Prozeduren möglich sind, muß dieses eine Methode eines Records oder eines Objekts werden

TGenericTRecord <TRecordtype>= class

function ByteArrayToMyRecord(ABuffer: TBytes): TRecordtype
end;