Курсовая работа: Создание сетевой игры

}

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

void __fastcall TMainForm::FormCloseQuery(TObject *Sender, bool &CanClose)

{

if (IsIgrayut)

{

menuStopClick(this);

if(IsIgrayut) CanClose=false;

}

}

//-------------------служебные функции преобразования типов---------------------

char* __fastcall TMainForm::DannieToChar(int Type, int MyCurOch, int MyWholeOch,

int ZnachKub1,int XKub1,int YKub1,

int ZnachKub2,int XKub2,int YKub2,

int ZnachKub3,int XKub3,int YKub3,

int ZnachKub4,int XKub4,int YKub4

)

{

AnsiString strTmp=IntToStr(Type)+";"+IntToStr(MyCurOch)+";"+IntToStr(MyWholeOch)+";"+

IntToStr(ZnachKub1)+";"+IntToStr(XKub1)+";"+IntToStr(YKub1)+";"+

IntToStr(ZnachKub2)+";"+IntToStr(XKub2)+";"+IntToStr(YKub2)+";"+

IntToStr(ZnachKub3)+";"+IntToStr(XKub3)+";"+IntToStr(YKub3)+";"+

IntToStr(ZnachKub4)+";"+IntToStr(XKub4)+";"+IntToStr(YKub4)+";";

return strTmp.c_str();

}

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

int* __fastcall TMainForm::CharToMas(char* charPriem)

{

AnsiString strPriem=charPriem;