Typ einzelner Array of const-Elemente

[sirius]

Du nimmst statt TVardata TVarRec.
etwa so:

Delphi-Quellcode:

for i:=0 to high(a) do begin
  if (TVarRec(a[i]).VType = vtinteger)
      then memo1.lines.Add(inttostr(TVarRec(a[i]).VInteger))
 end;

Edit:

Zitat:

Natürlich geht das nicht, ein array of const ist schließlich kein array of Variant.

Aber ein array of TVarRec