Форум: Техническая поддержка

void __fastcall TInichialTread::Execute()
{   int i;
	WORD Canal;
	Canal = 0x0;

	Synchronize(InitThread);

	Form3->Label1->Caption = "Модуль запущен";

	// остановим работу АЦП и одновременно сбросим USB-канал чтения данных
	if(!ThreadError) { if(!pModule->STOP_ADC()) ThreadError = true; }

		while(!Terminated && !ThreadError)
		{
		// делаем предварительный запрос на ввод данных
		if(!pModule->ReadData(&IoReq[Canal]))
			{ Mes = "Не могу послать запрос на сбор данных с модуля!";
			Synchronize(ShowErrorMessageBox);
			}

		if(!pModule->START_ADC())
			{ Mes = "Не могу стартануть сбор данных!";
			Synchronize(ShowErrorMessageBox);
			}

		for(i = 0x1; i < NDataBlock; i++)
			{
			Canal ^= 0x1;

			if(!pModule->ReadData(&IoReq[Canal]))
				{ Mes = "Не могу прочитать данные с 1 канла!";
				Synchronize(ShowErrorMessageBox);
				}
			if(!WaitingForIoRequestCompleted(&IoReq[Canal]))
				{ Mes = "Не могу прочитать данные с 2 канла!";
				Synchronize(ShowErrorMessageBox);
				}
			Sleep(20);
		}

			Canal ^= 0x1;

		if(!WaitingForIoRequestCompleted(&IoReq[Canal]))
				{ Mes = "Не могу прочитать данные с 2 канла!";
				Synchronize(ShowErrorMessageBox);
				}

		if(!pModule->STOP_ADC())
				{ Mes = "Не могу завершить сбор данных!";
				Synchronize(ShowErrorMessageBox);
				}
		Synchronize(RedrawViewer);

		Sleep(100);
	}
	if(!pModule->STOP_ADC())
		{ Mes = "Не могу завершить сбор данных!";
		Synchronize(ShowErrorMessageBox);
		}
	// прервём все асинхронные запросы
	if(!CancelIo(ModuleHandle))
		{ Mes = "Не могу прервать асинхронный сбор!";
		Synchronize(ShowErrorMessageBox);
		}
	// освободим используемые ресурсы
	FreeResource();
	// ждём-с
	while(!Terminated) { Sleep(50); }
	}

void __fastcall TInichialTread::RedrawViewer(void)
{
	DWORD i;

		for (i=0;i<PointsToRead;i++)
			{
			Form3->Memo1->Lines->Add(String().sprintf(L"%d ",(int)IoReq[Canal].Buffer[i]));
			}
			Sleep(20);
		}

void __fastcall TForm3::Timer1Timer(TObject *Sender)
{
		DWORD FifoOverflowFlag, FifoSize, MaxFifoBytesUsed;
		double FifoMaxPercentLoad;

	Label2->Caption = Now().TimeString();

	if (!pModule->FIFO_STATUS(&FifoOverflowFlag, &FifoMaxPercentLoad, &FifoSize, &MaxFifoBytesUsed))
		{
		Memo2->Lines->Add(L" Fifo NO");
		}
   //	else
	   //	{
	   //	if (FifoOverflowFlag == 1)
		 //	{
		  //	Memo2->Lines->Add(L" FifoOverflowFlag Error");
		   //	//if(Buffer) { delete[] Buffer; Buffer = NULL; }
		   //	return;
		   //	}
		else
		{
		StartThread();
		}
	}

Form3->Memo1->Lines->Add(String().sprintf(L"%4.2d ",(int)IoReq[Canal^0x1].Buffer[i]));