Memo speichern

[hansdieter11]

Hey alle zusammen :)

ich habe ein Delphi Problem (oh Wunder :mrgreen: )
ich programmiere grad ein programm in dem man in eine memo einen text schreiben kann,
der dann gespeichert wird wenn man auf einen button drückt, man kann diesen text auch wieder laden
und zählen lassen wieviele Zeilen es gibt :P
ich hab das ganze mal als datei angehängt wie weit ich schon gekommen bin... :)
so jetzt zu meinem eigentlichen problem:
es soll noch gefragt werden wo man die textdatei (memo) speichern will, sprich man soll den ordner usw auswählen können
und mit dem laden soll das natürlich genauso sein :P
mein lehrer meinte das geht mit dem befehl savedialog oder so etwas?! jedoch komme ich momentan nicht weiter..

es wäre super wenn ihr mir helfen könntet :)
freundliche grüße...

[jaenicke]

Grundsätzlich sieht das z.B. so aus:

Delphi-Quellcode:

if SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(OpenDialog1.FileName);

// EDIT:
Das muss natürlich SaveDialog1.FileName heißen.

[Luckie]

Dann guck doch mal in der Komponentenpalette bei den Dialogen, was du da findest.

[Meflin]

Das ist kein Befehl, sondern eine Komponente. Guck mal unter "Dialoge", da gibts TOpenDialog und TSaveDialog. Die kannst du einfach auf deinem Formular platzieren. Benutzen kannst du das dann so:

Delphi-Quellcode:

if OpenDialog1.Execute then 
begin 
Memo1.Lines.Clear; 
DateiName := (OpenDialog1.Filename); 
Memo1.LoadFromFile(DateiName); 
end;

[hansdieter11]

ah okay das ist eine komponente, so komm ich der lösung schonmal näher :P trotzdem meckert er noch rum.. was ist denn dieses execute für ne eigenschaft?!
unser lehrer neigt dazu einfach nur sachen aus seinem buch abzuschreiben, schade das man so den unterricht kaputt machen kann :(
könnte mir sonst jemand einfach mein programm soweit ergänzen? dann würde ich sehen wie das funktioniert :P
danke schonmal für die rückmeldungen :)

[Satty67]

Meflin und jaenicke haben es doch schon wunderbar ergänzt. Ist sogar der fertige Code, musst nur noch die beiden Komponenten auf dein Formular ziehen und den Code per Copy&Paste einfügen

[hansdieter11]

gut, und wofür steht das dateiname? bzw was muss ich da einsetzen? :P
danke schonmal :)

[jaenicke]

Machs am einfachsten wie ich beim Speichern ganz oben, dann sind das auch nur zwei Zeilen.

[mkinzler]

Zitat:

Zitat von hansdieter11

gut, und wofür steht das dateiname? bzw was muss ich da einsetzen? :P
danke schonmal :)

Ist eine Variable, kannst du auch weglassen:

Delphi-Quellcode:

Memo1.LoadFromFile(OpenDialog1.Filename);

[hansdieter11]

okay danke, soweit alles gut nur jetzt bekomme ich ne fehler meldung
"undefinierter bezeichner: LoadFromFile"
und
"verwendete uni1 kann nicht complimiert werden" oder so, weiß jemand von euch wodran das liegt? :P sonst häng ich das ganze nochmal als anhang dran

danke :)