coloquei a propriedade do form KeyPreview = True
E no evento OnKeyDown:
Case Key of
VK_RMENU: BBEditarClick(BBEditar);
VK_RCONTROL : BBAtualizarClick(BBAtualizar);
VK_RSHIFT: BBSalvarClick(BBSalvar);
end
Só que não acontece nada. O que falta?