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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 03.06.2011, 23:29   #1
c0zak
Пользователь
 
Регистрация: 06.11.2009
Сообщений: 36
По умолчанию keybd_event Непонятка 0_0

По нажатию горячей клавиши обрабатывается keybd_event, всё прекрасно работает но только в приложениях с вводом текста, а допустим в игрушке не пашет, например подвесил комбо из MK3 и ничего реакции нет, хотя горячая клавиша сработала... В чём может быть дело?
Твои сны-как лотерея, это то что мы умеем... ©СЛОТ
c0zak вне форума Ответить с цитированием
Старый 04.06.2011, 00:53   #2
c0zak
Пользователь
 
Регистрация: 06.11.2009
Сообщений: 36
По умолчанию

Код:
procedure TForm6.WM_HotKeyHandler (var Message: TMessage);
 var
 idHotKey: integer;
 fuModifiers: word;
 uVirtKey: word;
begin

 idHotkey:= Message.wParam;
 fuModifiers:= LOWORD(Message.lParam);
 uVirtKey:= HIWORD(Message.lParam);

if uvirtkey=VK_numpad1 then
begin
keybd_event(VK_LSHIFT, 0, 0, 0);
 for k1 := 0 to i1-1 do
begin
  keybd_event(ord(posl1[k1]), 0, 0, 0);   //Вот этот кусок пашет только для 
  sleep(100);                                     //полей ввода текста, а почему?
  keybd_event(ord(posl1[k1]), 0, KEYEVENTF_KEYUP, 0);
  sleep(strtoint(edit2.Text));
   end;
   keybd_event(VK_LSHIFT, 0, KEYEVENTF_KEYUP, 0)
end;
 inherited;
end;
Может он посылает только символ но не саму клавишу?
Твои сны-как лотерея, это то что мы умеем... ©СЛОТ
c0zak вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
keybd_event в c# Lemo Помощь студентам 2 05.02.2011 17:36
keybd_event() Умед Общие вопросы Delphi 4 26.07.2010 13:49
Проблемы с keybd_event AxenicX Win Api 0 06.02.2010 23:44
Excel 2007 65536x256 0_0 Exo Microsoft Office Excel 2 20.01.2009 17:50
keybd_event [Smarik] Win Api 1 23.03.2008 18:11