statt
[quote="Fussball-Robby"]
Delphi-Quellcode:
while Length(str) < 10 do
s := ' ' + s;
oder
stri := StringOfChar(' ', Len - Length(stri)) + stri;
einfach
stri := stri + ' ';
die Definition war ja
Var stri:string[10];
und dort wird alles über 10 Zeichen abgeschnitten
