heroname.cpp

本人用BCB编写的扫雷小游戏

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "HeroName.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
THeroNameForm *HeroNameForm;
//---------------------------------------------------------------------------
__fastcall THeroNameForm::THeroNameForm(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall THeroNameForm::FormKeyDown(TObject *, WORD &Key,
      TShiftState )
{
  if (Key == 27)
  {
    Close();
  }
}
//---------------------------------------------------------------------------
void __fastcall THeroNameForm::Edit_NameKeyDown(TObject *Sender,
      WORD &Key, TShiftState Shift)
{
  if (Key == 27)
  {
    FormKeyDown(Sender,Key,Shift);
  }
}
//---------------------------------------------------------------------------
void __fastcall THeroNameForm::Button_OKClick(TObject *)
{
  Close();  
}
//---------------------------------------------------------------------------
void __fastcall THeroNameForm::Button_OKKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if (Key == 27)
  {
    FormKeyDown(Sender,Key,Shift);
  }  
}
//---------------------------------------------------------------------------
void __fastcall THeroNameForm::FormShow(TObject *)
{
  Edit_Name->SetFocus();  
}
//---------------------------------------------------------------------------