Form über eigenen Button schließen ...

[blauweiss]

Zitat von DeddyH:

Müsste nicht ein

Delphi-Quellcode:

procedure Tfrm.FormCloseQuery(Sender: TObject; var  CanClose: Boolean);
begin
  CanClose := Sender = Button1;
end;

genügen?

Nein, weil Sender ziemlich sicher das Form ist und nicht der Button....

blauweiss