Thema: Delphi Frage zur Stringlist

Einzelnen Beitrag anzeigen

100nF

Registriert seit: 7. Nov 2004
639 Beiträge
 
#12

Re: Frage zur Stringlist

  Alt 4. Jun 2005, 16:01
Zitat:
for i:=a to listbox1.items.count-1 do begin


eher so:
for i:=0 to listvix1.items.count-1 do begin aber:
Delphi-Quellcode:
procedure TfrmDatum.btnSpeichernClick(Sender: TObject);
var
datei:textfile;
i, a: integer;
begin
a:= ListBox1.Items.Count;
assignfile(datei,'C:\Dokumente und Einstellungen\Christian Vogel\Desktop\Datum.txt');
rewrite(datei);
for i:=a to listbox1.items.count-1 do begin
writeln(datei,listbox1.Items.Strings[i]);
end;
closefile(datei);
end;
wenn du sowieso eine listbox benutzt wäre es viel einfacher mit listview1.items.savetofile(datei)...
laden geht mit listview1.items.loadfromfile(datei)

[edit=alcaeus]quote-Tags durch Delphi-Tags ersetzt. Mfg, alcaeus[/edit]
  Mit Zitat antworten Zitat