Datei nummeriert speichern

[fkerber]

Hi!

Ich glaube, es müsste so heißen;

Delphi-Quellcode:

Try 
    flStrList.Assign(form1.SynMemo1.Lines); 
    Zahl := 0; 
    While zahl < pred(flStrList.Count) Do 
    Begin 
      inc(Zahl); 
      flStrList[Zahl] := 
        IntToStr(Zahl) +   //<-- hier
        DupeString(#32, 7 - Length(IntToStr(succ(Zahl)))) + 
        flStrList[Zahl];

ciao fkerber