Цитата:
Сообщение от kristall000
...Может быть для делфи есть какой то другой код для этих кнопок?
|
Этот код отличается для разных моделей, константного стандарта пока нет. Посмотрите его значение самостоятельно данным "пробником-крысоловкой"
Код:
var
mh: HHOOK;
function lmp(nCode: Integer; WParam: WPARAM; LParam: LPARAM): LRESULT; stdcall;
begin
Result:= CallNextHookEx(mh, nCode, WParam, LParam);
Form1.Label1.Caption:= IntToStr(WParam);
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
mh:= SetWindowsHookEx(14, @lmp, HInstance, 0);
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
UnhookWindowsHookEx(mh);
end;
возможно что ловушка его и перехватывает