Здравствуйте. Мне нужно задать две горячие клавиши. Тоесть чтобы при нажатии одной комбинации клавиш выполнялось тото действие, при нажатии второй комбинации другое действие. Задаю горячие клавиши таким образом:
| Код |
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 работают обе комбинации, когда же тестирую на ХП работает только вторая горячая клавиша. Вроде обе комбинации создаются одинаково, но почему же тогда не работает вторая? |