Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - MouseCursor umsetzen


lars - Do 07.11.02 14:59
Titel: MouseCursor umsetzen
Ich habe folgendes Problem: Ich setze den Mouscursor um (crDefault bzw. crNone), aber der Cursor wird nicht sofort umgezeichnet, sondern erst, wenn die Mouse bewegt wird. Hat jemand einen Lösung, wie ich den Mousecursor sofort umzeichnen lassen kann (bsp. indme ich ein onMouseMove auslöse??)
Danke
Lars


matze - Do 07.11.02 16:51

das kling jetzt vielleich doof, aber das ist jetzt so das erste was mir einfällt !!!

Dann beweg doch die maus nach dem cursor wechles einen pixel nach oben oder so !!!


tommie-lie - Do 07.11.02 17:07

kommt ganz drauf an, wo du deinen Cursor unsichtbar machst.
Ich hab's im FormCreate-Event gemacht, und da klappt's automatisch (zumindest mit Delphi 6PE unter Win98). Wenn du allerdings im MouseMove-Event den Cursor setzt, muss sich erst die Mouse moven (wie der Name schon sagt *g*) bevor es einen anderen Cursor gibt. Also musst du eifnach drauf achten, zu welchem Zeitpunkt der Cursor gesetzt wird. Am besten immer nach einem bestimmten Event (zum beispiel nach der erstellung der Form (FormCreate), bzw einer bestimmten Prozedur. Schlecht sind natürlich alle Mouse-Events, weil diese entweder einen Klick, eine Bewegung oder sonstwas von der Maus fordern, bis der Cursor verschwindet.

Tschüß
Thomas