28.06.2009, 18:39
|
 |
Прохожий
|
|
Регистрация: 28.06.2009
Сообщения: 7
Репутация: 10
|
|
Цитата:
|
Сообщение от Grosbeak_Coder
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var x,y: integer;
begin
x:=10;
y:=10;
SetCursorPos(x, y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_LEFTUP,0,0,0,0);
end; |
Спасибо тебе 
Цитата:
|
Сообщение от Страдалецъ
И самое главное - назвать его Дятел.
|
xD  |