Mouse bewegung registrieren

[Reini64]

ich habe die Lösung gefunden !

Delphi-Quellcode:

var 
  p: TPoint; 
begin 
  p := Mouse.CursorPos; 
  LabelP.Caption := 'X: ' + IntToStr(p.X) + ' / Y: ' + IntToStr(p.Y); //Koordinaten ausgeben 
  p.X := p.X + 100;  //X-Wert und 
  p.Y := p.Y + 100;  //Y-Wert verändern 
  Mouse.CursorPos := p;  //Neue Koordinaten übergeben 
end;

durch Abfrage des Labels über einen Timer kann man den Unterschied feststellen und entsprechend auswerten



[edit=MrSpock]Doppelpost gelöscht. Mfg, MrSpock[/edit]