Du versuchst einen zugewiesenen Eventhandler aufzurufen. Dies löst aber nicht das Event aus sondern ist eine Folge des Events. Du musst das Schliessen der Form auslösen um dein Ziel zu erreichen:
Delphi-Quellcode:
procedure tform1.button1click(sender ...)
begin
close;
end;
Die Methode Close löst das CloseQuery Ereignis aus und wenn mit True verlassen auch das schliessen der Form...