Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
1. Feb 2016
TValue: Dieses Array kann man aber nicht an ein array of const übergeben?
procedure Something(const Args: array of const);
var
RecPtr: PRec;
begin
New(RecPtr);
SetLength(RecPtr.Params, Length(Args));
for I := Low(Args) to High(Args) do
RecPtr.Params := Args;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by himitsu,
1. Feb 2016
Was sind "nummerische Werte"?
TVarRec = record { do not pack this record; it is compiler-generated }
case Integer of
0: (case Byte of
vtInteger: (VInteger: Integer);
vtExtended: (VExtended: PExtended);
vtString: (VString: PShortString);
vtAnsiString: (VAnsiString: Pointer);
vtCurrency: ...