Eigene Komponente mit OnClose-Event

[Sir Rufo]

Man kann durchaus in so einem OnDestroy Event mit ShowMessage arbeiten ... wenn man etwas beachtet:

Delphi-Quellcode:

procedure TFooForm.MyComponentDestroy( Sender: TObject );
begin
  if not csDestroying in Application.ComponentState then
    ShowMessage( 'Bin dann mal weg!' );
end;