Не получается обработать сигнал от нескольких клавиш

[Dimon90]

Сообщение от FaTaL

А если сделать через горячии клавиши RegisterHotKey не лучше будет?

мм... спасибо за подсказку, погуглил, сейчас че нить накатаю)

[Dimon90]

Написал через RegisterHotKey, второй день полет нормальный))

[FaTaL]

Так и должно быть. Выложи сюда свой код, чтобы у других такие вопросы сразу отпадали.

[Dimon90]

Данные брал из Гугла... написал по примеру как было описано там.
Покажу часть кода, которая касается обработки горячих клавиш.

 private
    { Private declarations }
    id1 : integer;
    procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;
  public
    { Public declarations }
  end;

procedure TForm1.FormCreate(Sender: TObject);
const
  VK_E = $45;

begin
  id1:= GlobalAddAtom('Hotkey1');
  RegisterHotKey(Handle, id1, MOD_CONTROL + MOD_Alt, VK_E);

end;

//при нажатии клавиш делаем...
procedure TForm1.WMHotKey(var Msg: TWMHotKey);
begin
  if Msg.HotKey = id1 then
      begin
        Form1.Show;    //в моем случае показываем форму
        timer1.Enabled:= false;
      end;

end;

[FaTaL]

И соответственно в OnClose нужно UnRegisterHotKey (Handle, id1);

[Dimon90]

FaTaL, ну да, верно)

Модератор, извините, буду знать))