Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.168 Beiträge
 
Delphi 12 Athens
 
#4

Re: Edit's, Checkboxen, Listboxen als Txt Datei speichern?

  Alt 9. Jun 2009, 10:42
Delphi-Quellcode:
var F: TextFile;

AssignFile(F, Datei);
Rewrite(F);
WriteLn(F, Edit1.Text); // wird immer geschrieben
if Edit2.Text <> 'then WriteLn(F, Edit2.Text); // nur wenn gefüllt
if CheckBox1.Checked then WriteLn(F, 'text für gewählte CheckBox');
...
CloseFile(F);
oder
Delphi-Quellcode:
var sl: TStringList;

sl := TStringList.Create;
sl.Add(Edit1.Text); // wird immer geschrieben
if Edit2.Text <> 'then sl.Add(Edit2.Text); // nur wenn gefüllt
if CheckBox1.Checked then sl.Add('text für gewählte CheckBox');
...
sl.SaveToFile(Datei);
sl.Free;
aber zurück in die Controls einlesen/laden kann man das dann nimmer, da es keine Zuordnungsmöglichkeit gibt.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat