Einzelnen Beitrag anzeigen

R2009

Registriert seit: 9. Mär 2009
Ort: Heidelberg
440 Beiträge
 
Delphi 2007 Professional
 
#1

Mouse absolute Position ermitteln!

  Alt 5. Apr 2009, 09:43
Hi,
hab ein ganz triviales Problem:
ich möchte ein tpicture mit Hilfe des Mauszeigers bewegen.

Delphi-Quellcode:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  label1.caption:=inttostr(x);
  label2.caption:=inttostr(y);
  image2.Left:=x;
  image2.Top:=y;
end;
klappt auch dganz gut solange ich den Mauszeiger ausserhalb des pictures halte. Wie kriege ich die aktuelle Position des Mauszeiger unabhängig ob der sich jetzt direkt über der Form oder über einem beliebigen Steuerelement befindet.
Ich will die Position immer relativ zur Form.

Danke!
Rainer Unger
Mein Profil:
Studium Allgemeine Elektrotechnik TH Darmstadt
Entwicklung von Tools für die Rundsteuer und Zählertechnik.
uP's Atmel Prozessoren (ATmega16,32,88...) in C und Assembler.
  Mit Zitat antworten Zitat