Гра "Перший мільйон", Детальна інформація

void __fastcall TForm1::Panel1MouseUp(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

Panel1->Color=clBtnFace;

}

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

void __fastcall TForm1::N4Click(TObject *Sender)

{

telefon=1;auditoria=1;fift=1;summa=0;// Global variables

position=1;

clear_level ();

out_text ("","","","","");

next_player++;

Form4->Show();

}

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

void reset_all ()

{

Form1->Close();

Form1->Show();

}

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

void __fastcall TForm1::Panel1Click(TObject *Sender)

{

int panel=1;

verify (panel);

}

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

void __fastcall TForm1::Panel2Click(TObject *Sender)

{