TEdit speichern und lesen

[Wikes]

Das habe ich schon gesehen und ausprobiert. Ich weiß nicht was da noch dazu gehört an Einstellungen?
Ich konnte damit beim Öffnen des Progamms die Werte automatisch speichern und dann hab ich den Wert geändert und es hat sich nichts getan. Beim erneuten Öffnen wars wieder weg und im Textfile ist auch nichts neues drinn gewesen. Das Lesen hat auch geklappt, aber beides zusammen nicht. Ich weiß nicht genau was noch dazu gehört. Vll könnt ihr mir ja helfen?

[p80286]

nun alleine beim Dateinamen, des Beispiels "'Catei.txt'" kringeln sich meine Fußnägel.

Zitat von Wikes:

Das habe ich schon gesehen und ausprobiert. Ich weiß nicht was da noch dazu gehört an Einstellungen?
Ich konnte damit beim Öffnen des Progamms die Werte automatisch speichern und dann hab ich den Wert geändert und es hat sich nichts getan. Beim erneuten Öffnen wars wieder weg und im Textfile ist auch nichts neues drinn gewesen. Das Lesen hat auch geklappt, aber beides zusammen nicht. Ich weiß nicht genau was noch dazu gehört. Vll könnt ihr mir ja helfen?

Jetzt wäre der richtige Moment um uns Deinen Sourcecode zu zeigen. denn manchmal ist der Unterschied zwischen dem was man glaubt gemacht zu haben, und dem was man wirklich gemacht hat, recht groß.

Gruß
K-H

[baumina]

Der Trick ist, dass du das Lesen und das Schreiben der Textdatei an der richtigen Stelle machst. Delphi hat dafür Ereignisse. Wenn du in den Entwurfsmodus des Formulars gehst, kannst du im Objektinspektor auf Ereignisse des Formulars gehen. Dort findest du das Ereignis OnCreate. Dort Doppelklicken und in der Procedure, die dann für dich erstellt wird, schreibst du den Code fürs Lesen der Textdatei und den Inhalt der Textdatei schiebst in den Text des Editfeldes. Für das Ereignis OnDestroy machst du ebenfalls einen Doppelklick und schreibst des Code für das Speichern in die Textdatei rein.

[Wikes]

Ich kann jetzt nicht an den Rechner, erst morgen wieder.

Ich habe einfach den Code aus dem Link genommen und natürlich den Datei Name/Ort angepasst. Aber des ganze was noch dazu gehört hab ich net sauber hingekriegt. Wenns irgendwo eine Anleitung auf Deutsch für die ganzen Ereignisse usw geben würde, wärs gut.
Aber Danke ich werds morgen probieren.

[BadenPower]

Zitat von Wikes:

Wenns irgendwo eine Anleitung auf Deutsch für die ganzen Ereignisse usw geben würde, wärs gut.

Delphi -> F1-Taste

oder zum Beispiel hier:
http://docwiki.embarcadero.com/Libra...s.TForm_Events

[Wikes]

Also ich habe es probiert baumina.

Code sieht so aus in meiner Form:

Delphi-Quellcode:

// Form_Test.OnCreate
procedure isi_FormCreate(Sender: TObject);
var
  List: TStrings;
begin
  List := TStringList.Create;
  try
    List.LoadFromFile('C:\Projekts\Textdokument.txt');
    if List.Count>0 then
      Edit1.Text:=List[0];
  finally
    List.Free;
  end;
end;


// Form_Test.OnDestroy
procedure isi_FormDestroy(Sender: TObject);
var
  List: TStrings;
begin
  List := TStringList.Create;
  try
    List.Add(Edit1.Text);
    List.SaveToFile('C:\Projekts\Textdokument.txt');
  finally
    List.Free;
  end;
end;

Das lesen funktioniert beim Öffnen des Programms, aber das Speichern bzw. überschreiben nicht.

[baumina]

Komisch, bei mir funktioniert dein Code. Vielleicht hast du keine Schreibrechte in dem Verzeichnis?

[CarlAshnikov]

Verwende bitte in Zukunft die Delphi Code Tags (der kleine Helm im Editor) damit dein Code besser lesbar ist.

Was bedeutet es funktioniert nicht? Kommt eine Fehlermeldung?

Sind die Prozeduren auch wirklich im Objektinspektor den entsprechenden Events (Create und Destroy) zugeordnet? Eigentlich sollte das nicht funktionieren, da sie keine Objektmethoden sind.

[Wikes]

Ich kanns auch in einem anderen Verzeichnis probieren.

Fehlermeldung kommt keine.
Was ist Delphi Code Tags?