Forum: Object-Pascal / Delphi-Language
Delphi
by Fussball-Robby,
27. Jan 2009
Ja, wenn ich das mal früher gewusst hätte.. :mrgreen:
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussball-Robby,
27. Jan 2009
Es geht hier doch nur ums Prinzip :mrgreen: Und mit dem bisher geschriebenen muss der Threadersteller wohl was anfangen müssen.
Forum: Object-Pascal / Delphi-Language
Delphi
by Fussball-Robby,
27. Jan 2009
Wenn du (so wie ich das verstanden habe) am Anfang jedes Strings Leerzeichen anhängen willst, bis der String 10 Zeichen lang ist, würde ich das so machen:while Length(str) < 10 do
s := ' ' + s;
Edit: Obwohl, besser so:procedure TForm1.Button1Click(Sender: TObject);
var
stri: String;
const
Len = 10;
begin
stri :=Edit1.Text;