Курсовая работа: Создание сетевой игры
this->Height=470;
lbKolKub->Caption=IntToStr(KolKub);
lbMaxOch->Caption=IntToStr(MaxOch);
lbMaxOch2->Caption=IntToStr(MaxOch);
lbNomPartia->Caption="Партия № 1";
lbSchetPoPartiam->Caption="0 : 0";
NomPartia=1;
IsIgrayut=true;
}
//---------------------------------------------------------
void __fastcall TMainForm::ChangeInterfacePerehodHoda(bool HozhuYa)
{
if(HozhuYa)
{
btBrosit->Enabled=true;
btFix->Enabled=true;
btBrosit->Color=clCream;
btFix->Color=clCream;
shapeBrosil->Caption->Font->Color=clWhite;
shapeFixed->Caption->Font->Color=clWhite;
lbStat->Caption="Твой ход...";
if (MyWholeOch>MaxOch-KolKub)
{
IsVisitApplicationBox=true;
Application->MessageBoxA("Единственно верный вариант для Вас сейчас - зафиксировать очки!","Предупреждение",MB_OK+MB_ICONEXCLAMATION);
IsVisitApplicationBox=false;
}
}
else