procedure TfmQAB.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin
if (Msg.CharCode = 116) and (HiWord(GetKeyState(VK_CONTROL)) = 1) then
begin
......
end
end;
Referência [link]
- Capturar a tecla SHIFT durante a seleção do item de menu? – Dicas Delphi – CJC Delphi (Dicas legais do Delphi)
- GetKeyState:GetKeyState ，Esta função recupera a chave virtual especificada -Rede Chinesa de Conhecimento da Enciclopédia
- DELPHI OnKeyDown,OnKeyPress,Diferença OnKeyUp-CSDN Blog_delphi onkeydown
- tabela de valores de chave delphi – tribo de Taiwan
- Como detectar a tecla ctrl-t no Delphi – Stack Overflow
- Tabela de comparação de valores de código de tecla do teclado
