#include "ArdoThread.h"
ArdoThread *ardor;

ardor = new ArdoThread(false);
ardor->FreeOnTerminate = true;


ardor = new ArdoThread(false);
ardor->FreeOnTerminate = true;
SetThreadPriority(ardor, THREAD_PRIORITY_NORMAL);


__fastcall ArdoThread::ArdoThread(bool CreateSuspended)
	: TThread(CreateSuspended)
{
}
//---------------------------------------------------------------------------
void __fastcall ArdoThread::Execute()
{
	pingdt1 = Now() + Seca(25);
	pingdt2 = Now() + Seca(25);
	int met = 1;
	try
	{
		int y = 0;
		double sc = Now();
		Sleep(200);
		double sy = Now();
		Sleep(300);
		double lo = Now();
		while(!Terminated)
		{
// тут ловлю не установление коннекта и перегружаю форму. pingdt1 - фиксация времени получения последнего ответа 
			if ((IPPort->Connected() && pingdt1 - Now() > 0,0104) || (IPPort->Connected() && pingdt2 - Now() > 0,0104)) {
                LiteReset = true;
			}
			Ex_Operator->Label98->Caption = Now();
			if (!Ex_Operator->NoProcess)
			{
				if (sc < Now()) {
					try
					{
						Synchronize(Ping);
					}
					catch (Exception &e)
					{
						AnsiString a = e.ToString();
						MessageBoxA(Ex_Operator->Handle, a.c_str(), "сенд", MB_OK);
					}
					sc = Now() + Seca(1);

				}
				//if (sc < Now())
				{
					try
					{
						String l = Ex_Operator->Ardo1Memo->Lines->Strings[0].Trim();
						if (l.Length() > 0)
							Synchronize(Printing);
						l = Ex_Operator->Ardo2Memo->Lines->Strings[0].Trim();
						if (l.Length() > 0)
							Synchronize(Printing2);

					}
					catch(Exception &e)
					{
						AnsiString a = e.ToString();
						MessageBoxA(Ex_Operator->Handle, a.c_str(), "принтинг", MB_OK);
					}
					//sy = Now() + Seca(0.5);
				}
				if (lo < Now())
				{
					try
					{
						Synchronize(DoLogika);

					}
					catch(Exception &e)
					{
						AnsiString a = e.ToString();
						MessageBoxA(Ex_Operator->Handle, a.c_str(), "логика", MB_OK);
					}
					//sy = Now() + Seca(1);
				}
			}
		}
		//Synchronize(Printing);
	}
	catch(...)
	{

	}