Edit-Eintrag speichern

[icqgoofy]

Ich hab ein kleines Problem!

Wie kann ich bei Delphi den Eintrag eines Edit-FEnster in einer Datei speichern?

Ich habe schon etliches ausprobiert, aber bis jetzt hat noch nichts funktoniert.

Gruß icqgoofy

[dahead]

da gibt es viele arten das zu bewerkstelligen.

kuck dich mal hier im forum nach folgenden themen um: INI (TIniFile), Registrierung (TRegistry), XML.

hier ein kurzes Beispiel für INI's (in die uses klausel den wert "Inifiles" hinzufügen):

Speichern

Delphi-Quellcode:

var
  INI: TInifile;
begin
  INI := TInifile.Create('C:\inidatei.ini'); // Dateiname ggf. abändern
  INI.WriteString('Edit-Daten', 'EditAdresse', Edit1.Text); //1. Feld Sektion, 2. Feld Name, 3. Feld Wert
  INI.Free; //und wieder aus dem speicher damit
end;

Laden

Delphi-Quellcode:

var
  INI: TInifile;
begin
  INI := TInifile.Create('C:\inidatei.ini'); // Dateiname ggf. abändern
  Edit1.Text := INI.ReadString('Edit-Daten', 'EditAdresse', Edit1.Text); //1. Feld Sektion, 2. Feld Name, 3. Feld Standard-Wert
  INI.Free; //und wieder aus dem speicher damit
end;

Das ganze kann man noch mit try finally verschönern, doch ich denke das prinzip ist klar.

edit1: rechtschreibfehler
edit2: laden-routine hinzugefügt.

[buyden]

Oder ganz simpel so:

Delphi-Quellcode:

procedure Tfrmconfig.btokClick(Sender: TObject);
var Textdatei: textfile;

begin
    assignfile(Textdatei,'datei.ini');
    rewrite(cTextdatei);
    writeln(Textdatei,edit1.text);
    closefile(Textdatei);
end;

[icqgoofy]

Vielen Dank!

Es hat geklappt, man kann ja, dne Pfad sogar noch ändern :)

Kann man eigentlich auch vorher noch einen Eintrag in die Textdatei machen,
denn ich habe jtzt 5 vershceidene Edit-Fenster, damit ich auch späteer noch die
gespeicherten Einträge zuordnen kann.

Gruß icqgoofy

[3_of_8]

Das kann man prima mit INI-Files machen. Schau dich mal auf http://dsdt.info um.

Für Streber (Verweis auf mich) geht es auch mit XML.

[Khabarakh]

Zitat:

Zitat von 3_of_8

Für Streber (Verweis auf mich) geht es auch mit XML.

Du verwechselst da was :stupid: . Streber sind faul. Sie streben nur, weil sie es nicht auf die einfache aber mühsame Art machen wollen. Deshalb lesen sie die Hilfe und verlassen sich auf die Streaming-Fähigkeiten von Delphi :wink: .

[3_of_8]

Ich bin ja selber ein Streber. (Verdammt, schon wieder einen Thread OT gemacht)

[Khabarakh]

Zitat:

Zitat von 3_of_8

Ich bin ja selber ein Streber. (Verdammt, schon wieder einen Thread OT gemacht)

Warum verwendest du dann die langweilige Methode :wink: ?
Meine persönliche Meinung ist jedenfalls, dass Streaming die einfachere und elegantere Methode ist, weshalb ich für Einstellungen überhaupt keine Inis mehr verwende.

Delphi-Quellcode:

WriteComponentResFile('foo.bar', Edit1);

// ~

try
  Ini := TIniFile.Create('foo.bar');
  Ini.WriteString('Settings', 'Edit1', Edit1.Text);
finally
  Ini.Free;
end;
// Und das nur für die Text-Property

[DGL-luke]

mmm... Khabarak... sach ma, frierst du da eine komplette Komponente ein? :shock:

Und wie lädt man die dann wieder?

[Khabarakh]

Zitat:

Zitat von DGL-luke

mmm... Khabarak...

Du hast schon wieder das zweite "h" vergessen :zwinker: . Aber ist wirklich nicht der leichteste Name :stupid:

Zitat:

sach ma, frierst du da eine komplette Komponente ein? :shock:

Wenn du mit Frieren Speichern aller published Properties meinst: Jab :) . Auch wenn das nicht direkt mit dem Topic übereinstimmt, ist es bei den anderen Property-Änderungen wahrscheinlich auch erwünscht, dass sie mitgespeichert und nicht resettet werden (Beispiel: User wählt einen Font aus / platziert das Control neu).

Zitat:

Und wie lädt man die dann wieder?

ReadComponentRes :wink:
Mehr Möglichkeiten erhält man, wenn man [oh]TStream.Read/WriteComponent[/oh] direkt aufruft (beispielsweise mehrere Komponenten in einem Stream)