unit2.~cpp

自编小俄罗斯方块

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TOKBottomDlg *OKBottomDlg;
//---------------------------------------------------------------------
__fastcall TOKBottomDlg::TOKBottomDlg(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------
__fastcall TOKBottomDlg::TOKBottomDlg(int m_iArea, int m_iLevel, BOOL m_bMusic, BOOL m_bDrawGrid, TComponent* AOwner)
	: TForm(AOwner)
{
	m_oldArea = m_iArea;
	m_oldLevel = m_iLevel;
	m_oldMusic = m_bMusic;
	m_oldDrawGrid = m_bDrawGrid;


	m_bMusic = FALSE;
	m_bDrawGrid = FALSE;

        switch(m_iArea)
	{
	case 0:
		ComboBox1->Text = "12行10列"; break;
	case 1:
		ComboBox1->Text = "18行15列"; break;
	case 2:
		ComboBox1->Text = "24行20列"; break;
	case 3:
		ComboBox1->Text = "30行25列"; break;
	}

	switch(m_iLevel)
	{
	case 0:
		ComboBox2->Text = "第一级: 蜗牛级"; break;
	case 1:
		ComboBox2->Text = "第二级: 笨鸭级"; break;
	case 2:
		ComboBox2->Text = "第三级: 雄鸡级"; break;
	case 3:
		ComboBox2->Text = "第四级: 猎狗级"; break;
	case 4:
		ComboBox2->Text = "第五级: 云豹级"; break;
	case 5:
		ComboBox2->Text = "第六级: 飞鹰级"; break;
	}
}
void __fastcall TOKBottomDlg::OKBtnClick(TObject *Sender)
{
        m_iArea = ComboBox1->ItemIndex;
	if (m_iArea<0 || m_iArea>3)
		m_iArea = 0;

	m_iLevel = ComboBox2->ItemIndex;
	if (m_iLevel<0 || m_iLevel>5)
		m_iLevel = 2;

        m_bMusic = CheckBox2->Checked;
	m_bDrawGrid = CheckBox1->Checked;
}
//---------------------------------------------------------------------------