Nicht vergessen in der Methode die AllocateHWnd uebegeben wird DefWindowProc auf die Messages aufrufen.
Msg.Result := DefWindowProc(FHWnd, Msg.Msg, Msg.wParam, Msg.lParam);
Wenn man das nicht macht, dann blockiert das Fenster das Herunterfahren.