Mauszeiger soll bei gedrückter Maustaste verschwinden

Marco · Hält's aus hier Beiträge: 10

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

Ehemaliges Mitglied Erhaltene Danke: 1

markieren

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 · Hält's aus hier Beiträge: 10

vielen Dank.

Gruß
Marco

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme