Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - String auf bestimmt länge setzen


tim4vfb - Do 22.01.04 09:51
Titel: String auf bestimmt länge setzen
Wie schaffe ich es das ich einen String, dessen Länge < 10 ist, auf diese Länge mit Leestellen aufzufüllen?? Am besten die Leerstellen vor den Zeichen!


Chatfix - Do 22.01.04 09:56

Eine Ahnung obs eine Funktion gibt, aber mit einer Schleife z.B.


Delphi-Quelltext
1:
2:
3:
4:
for i := Length(DeinString) to 10 do
begin
  DeinString := ' ' + DeinString;
end;


KidPaddle - Do 22.01.04 10:41


Delphi-Quelltext
1:
2:
  // '          ' = 10 Leerzeichen
  DeinString := DeinString + Copy('          '110 - Length(DeinString));


Gruß
KidPaddle


Chatfix - Do 22.01.04 11:00

Wenn dann aber


Delphi-Quelltext
1:
DeinString :=  Copy('          ',  1,  10 - Length(DeinString)) + DeinString;                    


Weil er wollte die Leerzeichen vorne...


Motzi - Do 22.01.04 11:14

Es gibt da noch so eine nette kleine praktische Funktion, die nennt sich "StringOfChar()"... ratet mal was die macht? :roll:


Chatfix - Do 22.01.04 12:09

Stimmt!

Hier ein Bsp für die Verwendung:


Delphi-Quelltext
1:
DeinString := StringOfChar(' '10 - Length(DeinString)) + DeinString;