Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by peterbelow,
27. Jun 2019
Dann ist deine Diagnose nicht korrekt, oder deine Zeichenroutine prüft nicht, ob der Mausknopf eigentlich gedrückt ist oder nicht und zeichnet daher auch, wenn das nicht der Fall ist. Wenn Du EmptyMouseQueue aufgerufen hast kann das Problem nur von mouse messages stammen, die danach erzeugt werden.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by peterbelow,
26. Jun 2019
{!
<summary>
Remove all mouse messages from the calling thread's message queue.</summary>
}
procedure EmptyMouseQueue;
var
Msg: TMsg;
begin
while PeekMessage(Msg, 0, WM_MOUSEFIRST, WM_MOUSELAST,
PM_REMOVE or PM_NOYIELD) do