FMX: Ohne Application.ProcessMessages Neu Malen inline bewirken

[QuickAndDirty]

In Windows kann ich mit
PeekMessage(msg, 0, 0, 0, PM_REMOVE) die Messages die das Control malen filtern (vermutlich WM_PAINT)...und nur die.
Und dann mit

Delphi-Quellcode:

TranslateMessage(msg);
DispatchMessage(msg);

Das malen inline ausführen lassen.

Funktioniert nur in Windows... aber das wäre schonmal ein Anfang.