Einzelnen Beitrag anzeigen

Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: TFileSaveAs und Execute abbrechen

  Alt 27. Feb 2007, 10:08
Hi,

im Ereignis BeforeExecute:

Delphi-Quellcode:
procedure TForm1.FileSaveAs1BeforeExecute(Sender: TObject);
begin
  if not <Bedingung> then
    Abort;
end;
Cu, Frank
Frank Reim
  Mit Zitat antworten Zitat