Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.03.2013, 18:18   #1
zeto.pwn3d
Новичок
Джуниор
 
Аватар для zeto.pwn3d
 
Регистрация: 06.03.2013
Сообщений: 1
Радость Cliker Fки

Ну вот собственно сам шаблон.


Код:

  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var c: char;
begin
if GetKeyState(VK_F1) > 0 then
keybd_event(VK_F1,0,0,0);
begin
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);

end
Должно быть так:
Цитата:
Зажали клавишу Ф1
Далее
Нажимает клавишу Ф1
Далее
Кликает левой кнопкой мыши
и такой цикл пока я не отпущу Ф1.

Помогите разобраться.Дальше всё сам сделаю.

Последний раз редактировалось Stilet; 07.03.2013 в 19:42.
zeto.pwn3d вне форума Ответить с цитированием
Старый 07.03.2013, 18:27   #2
Кольша
Далеко не
Участник клуба
 
Аватар для Кольша
 
Регистрация: 11.08.2011
Сообщений: 1,512
По умолчанию

Timer тебе в помощь..не факт что сработает..если для игры..т.к. некоторые игры по другому отлавливают нажатие клавы..
Кольша вне форума Ответить с цитированием
Старый 07.03.2013, 19:44   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Аналогично думаю что в игре банальное ХХХ_event не прокатит.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц