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

extern int telefon; AnsiString c;

extern play(AnsiString);

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

void out (AnsiString z)

{

if (telefon==0) Form3->Close();

if (z=="Clear")

{

Form3->Edit1->Clear();

z="";

}

Form3->Edit1->Text=Form3->Edit1->Text+z;

}

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

void dial (void)

{

if ((Form3->Edit1->Text.Length())==6)

{

extern auditorium;

AnsiString telc=Form3->Edit1->Text;

double tel=StrToInt(Form3->Edit1->Te\x7478\x3B29\x200D†\x6920\x2066\x7428\x6C65\x3D3D\x3336\x3534\x3231\x0D29††\x7B20

Form3->Label1->Caption=" Б.Єльцін не знає правильної відповіді.";

telefon=0;

}

if (tel==398276)

{

Form3->Label1->Caption="В.Ющенко точно знає,що провильний варіант A.";

telefon=0;

}

if (tel==158204)