komma am ende von string entfernen

[Sir Rufo]

Möchtest du etwa folgendes Ergebnis haben:

Code:

1,2,3,4,5,6,7,8, .... ,100

Dann füge einfach die Zahlen in ein StringList (jede Zahl mit Add immer rein)
Und mit der Eigenschaft CommaText bekommst du dann die gewünschte Ausgabe

Delphi-Quellcode:

var iZaehler: Integer;
    sl : TStringList;

begin
  sl := TStringList.Create;
  try

    for izaehler := 1 to 100 do
      sl.Add( IntToStr( iZaehler ) );

    memo1.Lines.add( sl.CommaText );

  finally
    sl.Free;
  end;
end;