Открытие второй формы по нажатию Alt+F1

Form2->Show();

#include "Unit2.h"

RegisterHotKey(Handle, 1, MOD_ALT, VK_F1); 
 
void __fastcall TForm1::OnHotKey(TMessage& msg)
{
 if (msg.LParamLo==MOD_CONTROL && msg.LParamHi==VK_F1)
 
{
 Form2->Show();
}
//---------------------------***--------------------------------------------

...
        protected:
void __fastcall OnHotKey(TMessage&);
private:    // User declarations
public:     // User declarations
        __fastcall TForm1(TComponent* Owner);
        BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_HOTKEY,TMessage,OnHotKey);
END_MESSAGE_MAP(TForm);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

void __fastcall TForm1::Action1Execute(TObject *Sender)
{
    Form2->Show();    
}

void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
 if (Key==VK_F1 && Shift.Contains(ssAlt)) Form2->Show();
}