Т.С.П.П / ТСПП Лабораторные работы / Лабораторная работа №6 / Проект / MainUnit

#include <vcl.h>
#pragma hdrstop
#include "MainUnit.h"
#include "CQUnit.h"
#include "Unit6_3.h"
#include "Unit4.h"
#include "Kubuk.h"
#include "Un2.h"
#include "Un3.h"
#include "Un4.h"
#include "Unit1.h"
int m=0,n=0;
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::Button1Click(TObject *Sender)
{
  switch(RadioGroup1->ItemIndex)
  {
    case 0: Form1->Show();break;
    case 1: Form6_3->Show();break;
    case 2: Form4->Show();break;
    case 3: CQForm->Show();break;
  }
}