Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Listbox items werden nicht in textfile gespeichert (https://www.delphipraxis.net/104704-listbox-items-werden-nicht-textfile-gespeichert.html)

gLu3xb3rchi 9. Dez 2007 16:06


Listbox items werden nicht in textfile gespeichert
 
Hallo

Ich hab folgende Procedure im Inet gefunden, sie mir angeschaut, mit ihr rumgespielt und, glaub ich zumindest, mehr oder weniger verstanden

Delphi-Quellcode:
// Write Procedure

procedure SaveStringToFile (Filename, SaveString: string);
var
  fs: TFileStream;
begin
  fs := TFileStream.Create (Filename, fmCreate);
  try
    if SaveString <> '' then
      fs.Write (SaveString[1], Length (SaveString));
  finally
    fs.Free;
  end;
end;
Delphi-Quellcode:
// close button

procedure TForm1.Button3Click(Sender: TObject);
 var liste2: String;
begin
 ListBox2.items.text:=liste2;
 SaveStringToFile ('highscore.txt', liste2);
 close;
end;
Wenn ich auf button3 klicke, schließt sich das programm, die .txt datei wird zwar erstellt, ist aber leer. Listbox2 ist definitiv mit mind. 3 items gefüllt. Es kommen außerdem keine fehler beim complimieren. Jetzt versuch ich schon seit stunden rauszufinden, warum nix in die blöde .txt datei geschrieben wird :/

thkerkmann 9. Dez 2007 16:09

Re: Listbox items werden nicht in textfile gespeichert
 
Hi,

andersrum wird ein Schuh draus:

Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
  liste2: String;
begin
  liste2 := ListBox2.items.text; // <<<<<<<<<<<<<<<<<< andersrum
  SaveStringToFile ('highscore.txt', liste2);
  close;
end;
Gruss

mkinzler 9. Dez 2007 16:11

Re: Listbox items werden nicht in textfile gespeichert
 
Warum verwendest du nicht die Methode der StringList-Klasse?

DeddyH 9. Dez 2007 16:46

Re: Listbox items werden nicht in textfile gespeichert
 
Was mkinzler damit sagen wollte:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
  ListBox2.Items.SaveToFile('highscore.txt');
  close;
end;
Das bringt die Klasse TStrings gleich mit, so dass die Verwendung einer externen Methode überflüssig ist.

gLu3xb3rchi 9. Dez 2007 20:04

Re: Listbox items werden nicht in textfile gespeichert
 
anders rum, klar .... jetzt seh ichs selbst ^^ :wall: manchmal is man einfach für die offensichlichsten Dinge blind

Hmm, die help datei von meinem delphi 7 schweigt leider über .savetofile identifer, deshalb wusst ich nicht, dass es eine class methode gibt.

Naja, Danke

edit: wie schön, da es ein savetofile identifer gibt, gibt es natürlich auch einen loadfromfile identifer, das erspart mir eine weitere procedure ^^

Bernhard Geyer 9. Dez 2007 20:13

Re: Listbox items werden nicht in textfile gespeichert
 
Zitat:

Zitat von gLu3xb3rchi
Hmm, die help datei von meinem delphi 7 schweigt leider über .savetofile identifer, ...

Glaub ich nicht. Such mal nach der Methode SaveToFile in der Klasse TStrings/TStringList. Da das Property Items vom Typ TStrings ist wäre ein Beschreibung der Methode bei TListBox fehl am Platz.

gLu3xb3rchi 9. Dez 2007 22:16

Re: Listbox items werden nicht in textfile gespeichert
 
stimmt hast recht, bissl falsch gesucht ^^


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:17 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz