Pointer do Mouse. Alguem sabe como recuperar a posição dele?

Delphi

17/03/2004

Caros amigos

Sei que posso capturar a posição do Mouse em uma variável TPointer com a função Mouse.CursorPos.
Sei também que TPointer funciona como um registro com dois campos ´x e y´ do tipo Inteiro Longo.

Só não descobri ainda como jogar estes valores em variáveis para poder trabalhar com elas. Lendo como registro não funciona.

Alguém me dá uma luz :?:

Obrigado

Marconi


Marconi

Marconi

Curtidas 0

Respostas

Skaarj

Skaarj

17/03/2004

Coloquei esse codigo no onclick do Form
var
  PosX,PosY : Double;
begin
  PosX := Mouse.CursorPos.x;
  PosY := Mouse.CursorPos.y;
  showmessage(´X: ´+FloatToStr(PosX)+´ Y:´+FloatToStr(PosY));
end;



GOSTEI 0
Marconi

Marconi

17/03/2004

SKAARJ

Muito Obrigado

Funcionou perfeitamente

Marconi


GOSTEI 0
Skaarj

Skaarj

17/03/2004

Blz guri!
Boa sorte!!


GOSTEI 0
POSTAR