format zur runtime mit versch.Typen

[HPW]

Mit der Forum-Suche doch noch was gefunden:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Test : array [0..2] of TVarRec;
begin
  Test[0].VInteger    := StrToInt(Edit2.text);
  Test[1].VExtended   := StrToFloat(Edit3.text);
  Test[2].VAnsiString := Edit4.text;
  Label1.Caption := format( Edit5.text , Test);
end;