Pon el "KeyPreview" del formulario en "True" y luego en el evento OnKeyDown el nombre de la función que quieres que se ejecute:
Código Delphi
[-]procedure TfralbaFact.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = VK_F8 then
Hacer_Cosas();
end;
Un Saludo.