Курсовая работа / KURSOVA_ROBOTA / Дроби / FracUnit

#include <vcl.h>
#pragma hdrstop
#include "FracUnit.h"
#include "AddUnit.h"
#include "CalculateFrac.h"
#include "SubUnit.h"
#include "MultUnit.h"
#include "DivUnit.h"
#include "PowUnit.h"
#include "RivnUnit.h"
#include "CheckUnit.h"
#include "SumMasivUnit.h"
#include "SortUnit.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TMainForm *MainForm;
//---------------------------------------------------------------------------
__fastcall TMainForm::TMainForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::Button1Click(TObject *Sender)
{
  MainForm->Close();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N2Click(TObject *Sender)
{
  SumForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N3Click(TObject *Sender)
{
  SubForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N4Click(TObject *Sender)
{
  MultForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N5Click(TObject *Sender)
{
  DivForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N6Click(TObject *Sender)
{
  PowForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N8Click(TObject *Sender)
{
  RivnForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N9Click(TObject *Sender)
{
  CheckForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N11Click(TObject *Sender)
{
  SumMassivForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------
void __fastcall TMainForm::N12Click(TObject *Sender)
{
  SortForm->Show();
  MainForm->Hide();
}
//---------------------------------------------------------------------------