Inhalt eines TEdit in eine Datei kopieren.

[Seppel]

Ok, also hab was zusammengebracht, aber das Programm speicherts net in der ini datei.

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);
var IniFile: TIniFile;
begin
try
IniFile:=TInifile.Create('login.ini');
  IniFile.WriteString('Host','Host', edServer.Text);
  IniFile.WriteString('User','Login', edLogin.Text);
  IniFile.WriteString('Pass','Passwort', edPasswort.Text);
  IniFile.WriteString('Database','Datenbank', edDB.Text);

finally
  IniFile.Free;
  end;



end;

Im selbenverzeichnis, wo das Proramm und alle anderen files die dazu gehören liegen, habe ich auch die login.ini erstellt.
Die sieht so aus:

Delphi-Quellcode:

[Host]
Login=
[User]
Login=
[Pass]
Passwort=
[Database]
Datenbank=

Es gibt auch keine Fehlermeldung, deshalb glaube ich, dass irgendwas mit der ini net stimmt.

edit: und der Code zum Laden net vergessen^^:

Delphi-Quellcode:

procedure TForm1.Button7Click(Sender: TObject);

var IniFile: TIniFile;
begin
try
IniFile:=TInifile.Create('login.ini');
  edServer.Text:=IniFile.ReadString('Host','Host', '');
    edLogin.Text:=IniFile.ReadString('User','Login', '');
      edPasswort.Text:=IniFile.ReadString('Pass','Passwort', '');
        edDB.Text:=IniFile.ReadString('Database','Datenbank', '');

  finally
  IniFile.Free;
  end;

end;