Utanför fönster...

[Mikey]

I delphi så kan man använda kommandon som OnMouseOver eller OnKeyDown. Fast det är bara ett problem, dessa kommandon fungerar bara så länge som man har delphi programmet aktivt och inte annars. Har man en händerse på OnMouseMove så fungerar den bara så långe man flyttar musen över fönstret inte utanför. Hur ska jag göra om jag vill att det ska fungera då också?

 

tack i förhand

 

/Mikey

[J S]

Använd en TTimer och skriv följande i hädelsen OnTimer.

Glöm inte att sätta intervallet på något lämpligt.

 

procedure TForm1.Timer1Timer(Sender: TObject);

var

Apoint: Tpoint;

begin

GetCursorPos(Apoint);

Label1.Caption := IntToStr(Apoint.x);

Label2.Caption := IntToStr(Apoint.y);

end;

 

Detta är en lite lite fusk/enkel lösning men de andra löningarna är ganska krångliga.