регистрация горячих клавиш.

[phphel]

Всем Добрый Вечер!

Для того, что бы зарегестрировать какой-либо хоткей я использую:

RegisterHotKey(handle,id,mod_alt,83);//Alt+Q

Проблема в том, что я хочу хранить значения хоткеев в .ini файлах, и думаю, что лучше всего это делать в ASCII кодах.

Вот собственно вопрос, как мне имея ASCII код клавиши, использовать его в этой функции?

Тобишь, нужно из 18 (ASCII код клавиши Alt) сделать mod_alt - для функции RegisterHotKey.
Аналогично, из 17 (ASCII код клавиши Ctrl) сделать mod_control.

Или может, все гораздо проще Прошу помощи, у знатоков...

[askarchic]

1 shl (n and 1)

Если n = $12, то выражение равно mod_alt, иначе mod_control.

[phphel]

Хм, сейчас чуть поэксперементировал, но не получается

var
   temp:integer;
begin
   temp:=1 shl (18 and 1);
   showmessage(inttostr(temp));

[askarchic]

mod_alt это константа, через ShowMessage ты покажешь ее значение, а не название.

[phphel]

Да, я уж это понял, подставил сейчас код клавиши, выражение возвращает единицу..

Напиши подробнее плиз, что-то не вьеду..

[askarchic]

Во что ты не въезжаешь конкретно?

[phphel]

Хм, название?))

Дык фишка еще в том, что бывает не только mod_alt и mod_control, есть еще mod_shift и т.д ))

На примере покажи, вот к примеру.

У меня есть значения из Ini Файла:

key1:='Alt';
key2:='Ctrl';

word1:='Q';
word2:='S';

Мне нужно их зарегестрировать:

id:=GlobalAddAtom('hotkey'); 
RegisterHotKey(handle,id,Что тут писать,Что тут писать);
id2:=GlobalAddAtom('hotkey2');
RegisterHotKey(handle,id2,Что тут писать,Что тут писать);

[askarchic]

Тебе на все 4 константы mod_ нужно выражение?

[phphel]

Мне нужно превратить:

key1 + word1 (Alt + Q) в mod_alt + 81.

Хоткеев может быть больше чем 2...

[askarchic]

Var
  Key: String; //Имя системной клавиши

...

RegisterHotKey(handle,id,
Byte(Key = 'Alt') Or (Byte(Key = 'Ctrl') Shl 1) Or (Byte(Key = 'Shift') Shl 2) Or (Byte(Key = 'Win') Shl 3), //Формуля для всех констант mod_
{Код символа уж сам справишься вбить});