Dies scheint zu funktionieren:
Delphi-Quellcode:
var
Test : array [0..0] of TVarRec;
Teststr : PChar;
begin
Teststr := PChar(Edit5.text);
Test[0].VType := vtAnsiString;
Test[0].VAnsiString := Teststr;
Label5.Caption := format( Edit4.text , Test);
end;
end.
Richtig so?
Ncohmal Danke für alle Beiträge!