Delphi-PRAXiS - Delphi ShowCursor+TWebBrowser

Huhu,

ich versuche grade privat etwas kleines umzusetzen. Eine art "Player" für Netflix, allerdings ohne die Api.
Soll heißen, ich stelle im grunde nur Netflix in einem TWebBrowser da. Die "Annehmlichkeiten" die ich mir basteln möchte werden so weitestgehend funktionieren. Fenster anpinnen, Favoritenverwaltung usw.

Jetzt zum Problem. Ich möchte den Mauscursor nach einigen Sekunden Idle ausblenden und bei Mausbewegung/Tastendruck wieder einblenden. Normalerweise keine große Sache, ich nutze dafür meist folgenden Code:

Delphi-Quellcode:

			procedure TForm1.aplctnvnts1Idle(Sender: TObject; var Done: Boolean);

begin

   if LastInput < 500 then ShowCursor(True);

   if LastInput > 6000 then ShowCursor(False);

end;

Das funktioniert auch, wenn ich die Maus direkt nach dem verschwinden bewege. Sie wird wieder gezeigt wie es soll.
Nur wenn ich das dann länger so lasse, 5 Minuten oder mehr, dann wird der Cursor bei Bewegung nicht wieder angezeigt. Er funktioniert zwar, das sehe ich weil die Overlays im Video reagieren oder meine Buttons klickbar sind. Nur ist der Cursor dabei unsichtbar. Ich verstehe nicht warum...

Gruß,
Andreas