|
Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.350 Beiträge
Delphi 11 Alexandria
|
Re: TFileSaveAs und Execute abbrechen
27. Feb 2007, 09:08
Hi,
im Ereignis BeforeExecute:
Delphi-Quellcode:
procedure TForm1.FileSaveAs1BeforeExecute(Sender: TObject);
begin
if not <Bedingung> then
Abort;
end;
Cu, Frank
Frank Reim
|