WMNCHitTest ist tot seit Vcl.Styles benutzt wird

[KodeZwerg]

Delphi Rio 10.3.2

Hallo, seitdem ich auf Rio umgesattelt habe und Vcl.Styles benutze ist der HitTest komplett tot, kann mir jemand helfen das wieder in Gang zu bekommen?

Delphi-Quellcode:

private
  procedure WMNCHitTest(var msg: TWMNCHitTest); message WM_NCHITTEST;
end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.WMNCHitTest(var msg: TWMNCHitTest);
begin
  inherited;
  if msg.Result = htClient then
    msg.Result := htCaption;
end;

Ich wollte erreichen das sich mein Formular per Maus bewegen läßt auch innerhalb der Form und nicht nur über deren Titelleiste.

Bin über jeden Hinweis dankbar, nehme auch gerne workarounds an!

Grüße!