VPF::Проблема с горячими клавишами

SultanOFF

Дата 23.2.2010, 14:53 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 108
Регистрация: 23.3.2008

Репутация: нет
Всего: нет

Здравствуйте. Мне нужно задать две горячие клавиши. Тоесть чтобы при нажатии одной комбинации клавиш выполнялось тото действие, при нажатии второй комбинации другое действие. Задаю горячие клавиши таким образом:

Код


var 
 kl,kl1,fkl1, fkl: cardinal;
keyid,keyid1: integer;

kl1:= MOD_CONTROL;
    case ComboBox3.ItemIndex of
    0:
            fkl1 := VK_F12;
    1:
      fkl1 := VK_F11;
      2:
      fkl1 := VK_F10;
      3:
      fkl1 := VK_F9;

  end;
  keyid1 := GlobalAddAtom('XPLOIT1');
  RegisterHotKey(Handle, keyid1, kl1, fkl1);
//и вторая комбинация
  kl := 0;
  case ComboBox2.ItemIndex of
    0:
            fkl := VK_F12;
    1:
      fkl := VK_F11;
      2:
      fkl := VK_F10;
      3:
      fkl := VK_F9;

  end;
  keyid := GlobalAddAtom('XPLOIT');
  RegisterHotKey(Handle, keyid, kl, fkl);

В принципе обе комбинации должны работать, однако все обстоит иначе. В вин7 работают обе комбинации, когда же тестирую на ХП работает только вторая горячая клавиша. Вроде обе комбинации создаются одинаково, но почему же тогда не работает вторая?

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »