| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как эмулировать мышь и клаву? [D6, Win95/98, Win2k]
Sural © (2002-10-05 06:24:00)Тут очень понадобилось эмулировать перемещение мыши, щелчки по её кнопкам и нажатия клавиш на клавивтуре. Подскажите пожалуйста, как это можно сделать. Заранее благодарен.
Ученик (2002-10-05 12:56:00) [1]Для "мышки" mouse_event
Rouse_ (2002-10-05 06:58:00) [2]
SetCursorPos(x,y);
Это для перемещения мышки
Это для нажатия клавиш
procedure TForm1.SendKeys(i : integer);
var Key : Byte;
begin
Key:=LoByte(i);
keybd_event(Key,0,0,0);
keybd_event(Key,0,KEYEVENTF_KEYUP,0);
end;
i - ASCII код клавиши
А с кликаньем мышкой попозже, щас уже голова не варит после бессонной ночи
Желаю успехов
| |
