Einzelnen Beitrag anzeigen

Benutzerbild von markus5766h
markus5766h

Registriert seit: 5. Mär 2009
Ort: Hamburg
569 Beiträge
 
Delphi XE8 Professional
 
#20

Re: Durchsuchen von Dateien

  Alt 2. Jun 2009, 13:11
Hier mal ein Beispiel zu TIniFile:

Delphi-Quellcode:
uses IniFiles;

procedure ReadIni;
var
Ini : TIniFile;
Password : String;
begin
 Ini:= TIniFile.Create(Pfad und Dateiname);
 Password := Ini.ReadString('Password', 'PW1', 'Fehler');
 Ini.Free;
end;

procedure SaveIni;
var
Ini : TIniFile;
Password : String;
begin
 Ini := TIniFile.Create(Pfad und Dateiname);
 Ini.WriteString('Password', 'PW1', Password);
 Ini.Free;
end;
Deine Ini-Datei muss jetzt so aussehen:

[Password]
PW1=[dein Passwort]
Markus H.
  Mit Zitat antworten Zitat