Hola NIKO, implementa este evento con este código para obtener lo que deseas. En la unit windows.pas están el resto de los números asociados a las distintas teclas. Debes pasar la propiedad KeyPreview del formulario a true.
Código:
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
var tecla:string;
begin
case key of
112: begin
winexec('notepad.exe',SW_SHOW);
tecla:='F1';
end;
113: begin
winexec('C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE',SW_SHOW);
tecla:='F2';
end;
end;
statusbar1.SimpleText:='Tecla Pulsada '+tecla;
end;
Espero te ayude esta idea.
Saludos