Form über eigenen Button schließen ...

[kamel08]

ich hätte das so gemacht:

//ein anderer Button soll tatsächlich die Form schliessen ...
procedure Tfrm.SpecialExitButtonClick(Sender: TObject);
begin
Form1.OnCloseQuery := nil;
close;
end;