Sortieren eines Arrays of String

[Andreas13]

Vermutlich gibt es die Funktion PadRight(..) in Delphi 5 noch nicht. DonPedroFo könnte jedoch wie folgt vorgehen:

Delphi-Quellcode:

function MyPadRight(Str_kurz: String; Ch: Char; Len_Soll: Integer): String;
var
  n_Ch: Integer; 
  
begin
  Result:= Str_kurz;
  n_Ch:= Len_Soll - Length(Str_kurz);
  If n_Ch < 1 Then
    Exit;
    
  Result:= Str_kurz + StringOfChar(Ch, n_Ch); // oder MyStringOfChar(..)  von oben
end;