Thema: Delphi Frage zu SaveDialog

Einzelnen Beitrag anzeigen

Thomm

Registriert seit: 16. Aug 2008
Ort: Nürnberg
73 Beiträge
 
Turbo Delphi für Win32
 
#5

Re: Frage zu SaveDialog

  Alt 31. Aug 2008, 10:16
Das stimmt aber auch nicht ganz

Wenn man "Speichern" anklickt, dann sollte das SaveDialog1 nur ausgeführt werden,

wenn noch keine Datei geöffnet wurde ,ansonsten wird es in der Datei gespeichert,

die schon geöffnet ist.

Delphi-Quellcode:
procedure TForm1.Speichern1Click(Sender: TObject);
begin
if SaveDialog1.execute then
begin
SaveDialog1.Options:= [ofOverwritePrompt];
Clientdataset1.Savetofile (OpenDialog1.FileName);
end;
end;
Gruß

Thomas
  Mit Zitat antworten Zitat