struct Dat
{
	byte cmd;
	byte cmd2;
	byte data;
};

struct InOutData
{
	Dat * Data;
	int Count;
	int CountAll;
	void Create(int n)
	{
		Data = new Dat[n];
		CountAll = n;
	};
	void Delete(void)
	{
		if (CountAll > 0)
		{
			delete Data;
		}
	};
	void Remove(int y)
	{
		if (Count > 0)
		{
			for (int i = y; i < Count - 1; i++)
			{
				Data[i].cmd = Data[i + 1].cmd;
				Data[i].cmd2 = Data[i + 1].cmd2;
				Data[i].data = Data[i + 1].data;
			}
			Count--;
			Data[Count].cmd = 0;
			Data[Count].cmd2 = 0;
			Data[Count].data = 0;
		}
	}
};

try
				{
					if (Ex_Operator->Ardo2DataIn.Count > 0) {
						ReadIncomeIPData2(Ex_Operator->Ardo2DataIn.Data[0].cmd, Ex_Operator->Ardo2DataIn.Data[0].cmd2);
						try
						{
							Ex_Operator->Ardo2DataIn.Remove(0);
						}
						catch(Exception &e)
						{
							AnsiString a = "Команда " + IntToStr(Ex_Operator->Ardo2DataIn.Data[0].cmd) + "/" + IntToStr(Ex_Operator->Ardo2DataIn.Data[0].cmd2) + "  " + e.ToString() + "/" + e.UnitName() + "/" + e.Message + "/" + e.UnitScope();+ "/" + e.UnitName();
							MessageBoxA(Ex_Operator->Handle, a.c_str(), "обработка 2-2", MB_OK);
						}
					}
				}
				catch(Exception &e)
				{
					AnsiString a = "Команда " + IntToStr(Ex_Operator->Ardo2DataIn.Data[0].cmd) + "/" + IntToStr(Ex_Operator->Ardo2DataIn.Data[0].cmd2) + "  " +  e.ToString() + "/" + e.UnitName();
					MessageBoxA(Ex_Operator->Handle, a.c_str(), "обработка 2", MB_OK);
				}

void __fastcall ArdoThread::ReadIncomeIPData2(int Comma, int Comma2)
{
	try
	{

....