Frage zu Application Processmessages

[iamjoosy]

Hallo,

folgende Ausgangslage:

Ein Tlabel an Position 100,100

Eine OnMouseEnter Event mit folgendem Inhalt:

Delphi-Quellcode:

begin
  ShowMessage('Der Event ist angekommen !')
end;

Ein Tbutton mit folgendem OnClick-Event:

Delphi-Quellcode:

begin
  Mouse.CursorPos:=ClienttoScreen(Point(101,101));
end;

Bei Click auf Button, kein Problem: Die Message wird angezeigt!

Wenn in OnClick jetzt aber folgendes steht:

Delphi-Quellcode:

begin
  Mouse.CursorPos:=ClienttoScreen(Point(101,101));
  while true do
  begin
    Application.ProcessMessages;
  end;
end;

bewegt sich zwar der Cursor, aber der Event wird nicht ausgelöst!

Also meine Frage: Wieso

Hintergrund:
Im echten Programm steht natürlich nicht die Endlosschleife "while true", sondern heir wird in einer Schleife Daten "gepollt", und es soll entprechend der Daten (von einem Eyetracker ... aber das würde jetzt hier zu weit führen) der Cursor psoitioniert werden und aber auch Ereignisse ausgelöst werden.

[edit=sakura] Space in die Überschrift eingesetzt. Mfg, sakura[/edit]