Se proprio vuoi F12 mi sa che devi farlo sull'onkeydown della form... altrimenti
se tu nella caption del tasto metti una & prima di un determinato carattere (es &button1)
facendo Alt+carattere (es :Alt+B) si scatena l'evento click Funziona con TButton e TBitBtn.
I TMenuItem invece hanno la proprietà shortcut