String mit Leerzeichen verursacht Chaos???

[AlexII]

Hallo,

ich speichere wie folgt die Einträge einer ListBox in eine txt-Datei:

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var i: Integer;
    s1,s2,s3,s4: String;
    List: TStringList;
begin
  List:=TStringList.Create;
  try
    for i:=0 to ListBox1.Count-1 do
    begin
    s1:=ListBox1.Items.Strings[i];
    s2:=ListBox2.Items.Strings[i];
    s3:=ListBox3.Items.Strings[i];
    s4:=ListBox4.Items.Strings[i];
    List.Add('=' + s1 + '=' + s2 + '=' + s3 + '=' + s4 + '=');
    end;
    List.SaveToFile(ExtractFilePath(ParamStr(0)) + '\Datei.txt');
 finally
    List.Free;
 end;
end;

Befindet sich allerdings in einem der Einträge der ListBox ein Leerzeichen wird das nächstfolgende Wort nicht mehr z.B. dem s1-String zugewiesen, sondern dem s2. Im s2 dem s3. :roteyes: Wer weiß woran es liegt? :gruebel:

[mkinzler]

Leerzeichen werden standardmässig als weiteres trennzeichen erkannt. mit

Delphi-Quellcode:

StringList.StrictDelimiter := True;

kann man das verhindern

[AlexII]

Bekomme die Fehlermeldung: Undefinierter Bezeichner: 'StrictDelimiter' :gruebel:

[mkinzler]

Dann scheinst du eine etwas alte Delphiversion zu haben

[AlexII]

Oh das stimmt, mit Delphi 2006 geht's. Und wie löse ich das Problem? Muss unbedingt bei Delphi 7PE bleiben. :gruebel:

Kann ich die Items der ListBox irgendwie anders abspeichern?

[mkinzler]

Zitat:

Oh das stimmt, mit Delphi 2006 geht's. Und wie löse ich das Problem? Muss unbedingt bei Delphi 7PE bleiben. Grübelnd...

Warum das?

Zitat:

Kann ich die Items der ListBox irgendwie anders abspeichern?

Ja manuell durchegehn und in eine Textdatei speichern

[AlexII]

Zitat:

Zitat:

Zitat von mkinzler

Zitat:

Oh das stimmt, mit Delphi 2006 geht's. Und wie löse ich das Problem? Muss unbedingt bei Delphi 7PE bleiben. Grübelnd...

Warum das?

Weil ich mir keine andere Version leisten kann und Turbo Explorer lässt keine Komponenten installieren.

Zitat:

Zitat:

Kann ich die Items der ListBox irgendwie anders abspeichern?

Ja manuell durchegehn und in eine Textdatei speichern

Geht das auch wie oben in einer Schleife? :gruebel:

[mkinzler]

Ja

[Klaus01]

.. oder Du schaust Dir einmal explode und implode an.

Grüße
Klaus

[Dax]

Zitat:

Zitat von mkinzler

Ja

[OT]
Daniiieeeeel set das untere Limit für Beitragslängen mal auf mindestens zwanzig Zeichen *G*
[/OT]