Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - Mauszeiger soll bei gedrückter Maustaste verschwinden
Marco - Fr 17.01.03 01:28
Titel: Mauszeiger soll bei gedrückter Maustaste verschwinden
Hi Leute!
Ich verstehe da ne Sache nicht.
Wenn ich onMouseDown den cursor auf crNone stelle und im ausgeführten Programm die linke Maustaste drücke, verschwindet der Mouse-Cursor erst, wenn ich die linke Maustaste wieder loslasse (Bei der rechten Maustaste verschwindet der Cursor sofort!)
Hat Delphi da irgendwelche Zeitprobleme? Warum funktionierts mit der rechten, und mit der linken nicht?
Hat jemand ne Idee, wie ich den Cursor verschwinden lassen kann, bei onMouseDown (linke Taste)?
Danke schon mal im Vorraus.
Gruß
Marco
Delete - Fr 17.01.03 02:41
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Screen.Cursor := crNone;
end;
procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
Screen.Cursor := crDefault;
end; |
Geht.
Marco - Sa 18.01.03 19:06
:D vielen Dank.
Gruß
Marco
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!