![]() |
Speichern==> Speichert nicht!
hi ich hab ein Programm geschrieben und will nun das man speichen und laden kann!
Delphi-Quellcode:
Muss nachdem procedure TForm1.Speichern1Click(Sender: TObject); begin Savedialog1.execute ; end;
Delphi-Quellcode:
noch was rein???
Savedialog1.execute ;
Spider |
Re: Speichern==> Speichert nicht!
Der SaveDialog ist nur der Dialog selber, um den Speicher-Pfad heruaszufinden.
Speichern musst du schon selber. Was genau soll denn gespeichert werden? Bei nem Memo und Richedit gibt es z.B. Lines.SaveToFile();... |
Re: Speichern==> Speichert nicht!
Es müssen 5 Panels gespeichert werden!
Quasi so:
Delphi-Quellcode:
Oder wie sonst?
...
Savedialog1.execute; Panel1.savetofile; Panel2.savetofile; Panel3.savetofile; . . . |
Re: Speichern==> Speichert nicht!
so sollte dann ein speichern dialog erscheinen!
wenn du dann noch speichern, musst du auf die property filename von savedialog1 zugreifen. also beispielsweise so:
Code:
wichtig ist auch noch, das du den savedialog mit einer if anweisung aufrust, also so:
memo1.lines.savetofile(savedialog1.filename);
Code:
dann wird nur gespeichert, wenn der benutzer nicht abbrechen gedrückt hat!
if savedialog1.execute then
begin //hier die speichern routine end; hoffe ich konnte dir weiterhelfen. gruss, iaby |
Re: Speichern==> Speichert nicht!
meinst du vielleicht den text des panels?
|
Re: Speichern==> Speichert nicht!
@Melfin
Jep! |
Re: Speichern==> Speichert nicht!
was meinst du mit panels speichern?
|
Re: Speichern==> Speichert nicht!
Code:
nicht ausprobiert, sollte aber gehen!
var datei: textfile;
begin assignfile(datei, savedialog1.filename); rewrite(datei); writeln(datei, panel1.caption); writeln(datei, panel2.caption); writeln(datei, panel3.caption); writeln(datei, panel4.caption); writeln(datei, panel5.caption); closefile(datei); end; |
Re: Speichern==> Speichert nicht!
@iaby
Der Text... Wenn halt x drin steht soll x gespeichert werden. Wenn man ein Neues Spiel macht und das Anfangs wert ist a und man ladet soll wieder wert X da sein! |
Re: Speichern==> Speichert nicht!
ein bsp mit dem du die captions in einer datei abspeichserst:
Delphi-Quellcode:
if savedialog1.execute then begin
Memo1.Lines[0] := Panel1.Caption; Memo1.Lines[1] := Panel2.Caption; Memo1.Lines[2] := Panel3.Caption; Memo1.Lines[3] := Panel4.Caption; Memo1.Lines[4] := Panel5.Caption; Memo1.Lines.SaveToFile(SaveDialog1.FileName); end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:27 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz