...
procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview:= True; end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Shift = [ssCtrl]) and (Lo(Key) = Ord('F')) then
BotonQueLLamaOtroForm.Click;
end;
...