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

#include <vcl.h>
#pragma hdrstop

#include "MainForm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmMain *frmMain;
//---------------------------------------------------------------------------
__fastcall TfrmMain::TfrmMain(TComponent* Owner) : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::grpColorsClick(TObject *Sender)
{
  if (grpColors->ItemIndex == 0)
    this->Color = clRed;
  else if (grpColors->ItemIndex == 1)
    this->Color = clGreen;
  else if (grpColors->ItemIndex == 2)
    this->Color = clBlue;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::edtTitleChange(TObject *Sender)
{
  Caption = edtTitle->Text + " - " + edtDescription->Text;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::edtDescriptionChange(TObject *Sender)
{
  Caption = edtTitle->Text + " - " + edtDescription->Text;
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::chkSpectreClick(TObject *Sender)
{
  if (chkSpectre->Checked)
    ShowMessage("You have selected the Spectre. Nice choice!");
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::chkArachnotronClick(TObject *Sender)
{
  if (chkArachnotron->Checked)
    ShowMessage("You have selected the Arachnotron. Good move!");
}
//---------------------------------------------------------------------------
void __fastcall TfrmMain::chkMancubusClick(TObject *Sender)
{
  if (chkMancubus->Checked)
    ShowMessage("You have selected the Mancubus. Everyone's favorite!");
}
//---------------------------------------------------------------------------