Einzelnen Beitrag anzeigen

Benutzerbild von scrat1979
scrat1979

Registriert seit: 12. Jan 2007
Ort: Sulzbach a.d. Murr
1.028 Beiträge
 
Delphi 10.4 Sydney
 
#7

Re: Daten speichern und wieder aufrufen können | auto in Var

  Alt 1. Sep 2007, 17:25
Hier mal ein Beispiel, wie man eine INI-Datei schreibt und liest (Ggf. auch mal die Hilfe bemühen...):

Delphi-Quellcode:
[...]
Uses ..., INIFiles;

[...]

// Speichert INhalt von Edit1 und Edit2 in INI-Datei
procedure TForm1.Button1Click(Sender: TObject);
var ifile : TINiFile;
begin
  ifile := TIniFile.Create('c:\test.ini');
  ifile.WriteString('allgemein', 'edit1', edit1.Text);
  ifile.WriteString('allgemein', 'edit2', edit2.Text);
  ifile.Free;
end;

// Holt die Informationen aus der INI-Datei wieder...
procedure TForm1.Button2Click(Sender: TObject);
var ifile : TINiFile;
begin
  ifile := TIniFile.Create('c:\test.ini');
  edit1.Text := ifile.ReadString('allgemein', 'edit1', 'kein Wert in INI-Datei!');
  edit2.Text := ifile.ReadString('allgemein', 'edit2', 'kein Wert in INI-Datei!');
  ifile.Free;
end;
Hoffe Dir weitergeholfen zu haben...

SCRaT
Michael Kübler
  Mit Zitat antworten Zitat