fenster das die maus verfolgt

**any_key**

aloah
ich bin gerade mal auf die idee gekommen was zu programmieren in dem das fenster die maus verfolgt
so hab ich dann auch mal ausprobiert:

Code:

			procedure TForm1.Timer1Timer(Sender: TObject);

var Pos: TPoint;

begin

  Form1.Left:=Pos.X;

  Form1.Top:=Pos.Y;

end;

aber wenn ich das programm jetzt starte verschwindet das fenster einfach nach ablauf des timers
kann mir da wohl wer helfen?

Füge einPos := Mouse.CursorPos; ein.

**any_key**

ah danke...
hab noch ne andere möglichkeit gefunden

Code:

GetCursorPos(Pos);

**SirThornberry**

Mouse.GetCursorPos ruft intern die funktion GetCursorPos auf

Dax (Gast) n/a Beiträge	#2 Re: fenster das die maus verfolgt 3. Sep 2006, 15:16 Füge einPos := Mouse.CursorPos; ein.
	Zitat

any_key Registriert seit: 7. Okt 2005 96 Beiträge Delphi 7 Personal	#3 Re: fenster das die maus verfolgt 3. Sep 2006, 15:21 ah danke... hab noch ne andere möglichkeit gefunden markieren Code: GetCursorPos(Pos);
	Zitat

SirThornberry (Moderator) Registriert seit: 23. Sep 2003 Ort: Bockwen 12.235 Beiträge Delphi 2006 Professional	#4 Re: fenster das die maus verfolgt 3. Sep 2006, 16:38 Mouse.GetCursorPos ruft intern die funktion GetCursorPos auf Jens Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
	Zitat