|
Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: String Befehl Format formatieren
23. Jul 2012, 22:24
Delphi-Quellcode:
procedure TForm2.Button1Click(Sender: TObject);
begin
Showmessage(
'"'+ Format('%15.5s - %15.5s',['Test1234','Test9876']) +'"'
+#13#10+ '"'+ Format('%-15.7s - %-15.7s',['Test1234','Test9876']) +'"'
+#13#10+ '"'+ Format('%-15.9s - %19.9s',['Test1234','Test9876']) +'"'
);
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
|
|
|
Zitat
|