Ereignis bei Klilck aufs X

[Maja Jessica]

Hi

probier es aus ... :

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  ShowMessage('onClose');
end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  ShowMessage('onCloseQuery');
end;

MJ