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

{

randomize();

int rnd=random (Form1->Table4->RecordCount);

Form1->Table4->First();

Form1->Table4->MoveBy(rnd);

}break;

case 2:

{

randomize();

int rnd=random (Form1->Table5->RecordCount);

Form1->Table5->First();

Form1->Table5->MoveBy(rnd);

}break;

case 3:

{

randomize();

int rnd=random (Form1->Table6->RecordCount);

Form1->Table6->First();

Form1->Table6->MoveBy(rnd);

}break;

}

}

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

void no_fire ()

{

if (position==6)

{

NoFire->Summa->Left=160;

"1 000 грн.");

NoFire->Level->Caption="першої";