WM_NCDestroy - Implementierung erzwingen - aber wie?

[himitsu]

Und es gäbe auch keine Probleme bei mehrfachen Instanzen.

Aber sicher, daß WM_NCDestroy so stimmt?
Bei Inherited würde eventuell auf ein Objekt zugegriffen, welches nicht mehr existiert;

Delphi-Quellcode:

Procedure TKlasse1.WM_NCDestroy(Var Message: TWMNCDestroy);
Begin
   Inherited;
   Self.Free;
End;