Can Execute a SaveDialog only one time (?)
From: Bert Prins (prinsoft_at_hotmail.com)
Date: 11/25/03
- Next message: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Previous message: ADingOD: "print html to multiple printers?"
- Next in thread: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Reply: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Tue, 25 Nov 2003 08:36:39 +0100
Hello.
In a procedure I create a SaveDialog on the fly like this:
sd := TSaveDialog.Create(self);
sd.Filter := 'Rapportage-bestanden (*.RepGen)|*.RepGen';
sd.DefaultExt := '*.RepGen';
sd.Options := sd.Options + [ofOverwritePrompt, ofCreatePrompt];
sd.InitialDir := Form_Tab_Result.RGT.SelFileDir;
sd.FileName := Form_Tab_Result.RGT.SelFileName;
if sd.Execute then begin
........................
end;
At the end of the procedure I free the dialog:
sd.Free;
The first time I call this procedure, the Dialog execute and everything
works fine. But the next time I need this procedure the Dialog don't
execute. The procedure don't generate an exception.
Can anyone help me with this, I don't see what goes wrong.
Bert Prins
- Next message: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Previous message: ADingOD: "print html to multiple printers?"
- Next in thread: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Reply: Bert Prins: "Re: Can Execute a SaveDialog only one time (?)"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|