Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#3

Re: Listbox Items auf eine Länge bringen

  Alt 17. Dez 2005, 21:08
Und falls mal einer der Strings zu kurz ist hilft vielleicht das:

Delphi-Quellcode:
function RightPad(s: string; padChar: char; size: byte): string;
begin
  if Length(s) < size
    then Result := s + StringOfChar(padChar, size - Length(s))
    else Result := s;
end;
Grüße vom marabu
  Mit Zitat antworten Zitat