нужнапомощь!работа с мышью

[ras122]

задача: отследить текущие координаты мыши, записать в переменные, переместить курсор в заданное место, нажатие правой (левой) кнопки мыши, дабл-нажатие обеих кнопок

синтаксис этих дел напишите пожалуйста)
заранее спасибо)

[SunKnight]

http://softhelp.ru/delphi/osferum/n....mouse_out_trap

[Air]

С 1 легко.

SetCursorPos(X,Y); // установить курсор в позицию XY

var e:Tpoint;
begin
GetCursorPos(e); // получить позицию курсора
label2.Caption:=inttostr(e.X)+' '+inttostr(e.Y); // вчитать данные
end;