Передача одного байта по com-порту

 
HANDLE COMport;  //дескриптор порта
 
OVERLAPPED overlapped; //будем использовать для операций чтения (см. поток ReadThread)
OVERLAPPED overlappedwr; //будем использовать для операций записи (см. поток WriteThread)
unsigned char
bufrd[10],
bufwr[10]; //приёмный и передающий буферы
 
freq,time1,time2;
freqD=0.;
resD=0.;

void COMOpen(UnicodeString strochka)
{
 unsigned char *str = AnsiString(strochka).c_str();
 String portname;       //имя порта (например, "COM1", "COM2" и т.д.)
 DCB dcb;                //структура для общей инициализации порта DCB
 COMMTIMEOUTS timeouts;  //структура для установки таймаутов
 //открыть порт, для асинхронных операций обязательно нужно указать флаг FILE_FLAG_OVERLAPPED
 COMport = CreateFile(str,GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, NULL);
 //здесь:
 // - portname.c_str() - имя порта в качестве имени файла, c_str() преобразует строку типа String в строку в виде массива типа char, иначе функция не примет
 // - GENERIC_READ | GENERIC_WRITE - доступ к порту на чтение/записть
 // - 0 - порт не может быть общедоступным (shared)
 // - NULL - дескриптор порта не наследуется, используется дескриптор безопасности по умолчанию
 // - OPEN_EXISTING - порт должен открываться как уже существующий файл
 // - FILE_FLAG_OVERLAPPED - этот флаг указывает на использование асинхронных операций
 // - NULL - указатель на файл шаблона не используется при работе с портами
 if(COMport == INVALID_HANDLE_VALUE)            //если ошибка открытия порта
  {
       ShowMessage("Ошибка открытия порта");
   return;
  }
 //инициализация порта
 dcb.DCBlength = sizeof(DCB);  //в первое поле структуры DCB необходимо занести её длину, она будет использоваться функциями настройки порта для контроля корректности структуры
 //считать структуру DCB из порта
 if(!GetCommState(COMport, &dcb)) //если не удалось - закрыть порт и вывести сообщение об ошибке в строке состояния
  {
        ShowMessage("Ошибка открытия порта 0");
       COMClose();
   return;
  }
 //инициализация структуры DCB
 dcb.BaudRate = 9600;       //задаём скорость передачи 9600 бод
 dcb.fBinary = TRUE;                                    //включаем двоичный режим обмена
 dcb.fOutxCtsFlow = FALSE;                              //выключаем режим слежения за сигналом CTS
 dcb.fOutxDsrFlow = FALSE;                              //выключаем режим слежения за сигналом DSR
 dcb.fDtrControl = DTR_CONTROL_DISABLE;                 //отключаем использование линии DTR
 dcb.fDsrSensitivity = FALSE;                           //отключаем восприимчивость драйвера к состоянию линии DSR
 dcb.fNull = FALSE;                                     //разрешить приём нулевых байтов
 dcb.fRtsControl = RTS_CONTROL_DISABLE;                 //отключаем использование линии RTS
 dcb.fAbortOnError = FALSE;                             //отключаем остановку всех операций чтения/записи при ошибке
 dcb.ByteSize = 8;                                      //задаём 8 бит в байте
 dcb.Parity = 1;                                        //проверка нечётности
 dcb.StopBits = 2;                                      //задаём 2 стоп-бит
 //загрузить структуру DCB в порт
 if(!SetCommState(COMport, &dcb)) //если не удалось - закрыть порт и вывести сообщение об ошибке в строке состояния
  {
       ShowMessage("Ошибка открытия порта 1");
   COMClose();
   return;
  }
 
 //установить таймауты
 timeouts.ReadIntervalTimeout = 0;   //таймаут между двумя символами
 timeouts.ReadTotalTimeoutMultiplier = 0; //общий таймаут операции чтения
 timeouts.ReadTotalTimeoutConstant = 0;         //константа для общего таймаута операции чтения
 timeouts.WriteTotalTimeoutMultiplier = 0;      //общий таймаут операции записи
 timeouts.WriteTotalTimeoutConstant = 0;        //константа для общего таймаута операции записи
 
 //записать структуру таймаутов в порт
 if(!SetCommTimeouts(COMport, &timeouts)) //если не удалось - закрыть порт и вывести сообщение об ошибке в строке состояния
  {
       ShowMessage("Ошибка открытия порта 2");
   COMClose();
   return;
  }
 //установить размеры очередей приёма и передачи
 SetupComm(COMport,2000,2000);
 PurgeComm(COMport, PURGE_RXCLEAR); //очистить принимающий буфер порта
}
//---------------------------------------------------------------------------
//функция закрытия порта
void COMClose()
{
 if(COMport)
 {
    CloseHandle(COMport); //закрыть порт
    COMport = 0;
 }
}
//---------------------------------------------------------------------------

overlappedwr.hEvent = CreateEvent(NULL, true, true, NULL); //создать событие
overlapped.hEvent = CreateEvent(NULL, true, true, NULL); //создать событие
 
DWORD btr, temp, mask, signal; //переменная temp используется в качестве заглушки
 
bufwr[0]=0x1;
SetCommMask(COMport, EV_RXCHAR); //установить маску на срабатывание по событию приёма байта в порт
WriteFile(COMport, bufwr, 1, &temp, &overlappedwr); //записать байты в порт (перекрываемая
WaitForSingleObject(overlappedwr.hEvent, INFINITE); //приостановить поток, пока не завершится
 
QueryPerformanceFrequency(&freq);
freqD = (double)freq.QuadPart/1000000;   
QueryPerformanceCounter(&time1);   // засекаю таймер
 
WaitCommEvent(COMport, &mask, &overlapped); //ожидать события приёма байта (это и есть перекрываемая операция)
ReadFile(COMport, bufrd, 1, &temp, &overlapped); //прочитать байты из порта в буфер программы
WaitForSingleObject(overlapped.hEvent, INFINITE); //приостановить поток, пока не завершится
 
QueryPerformanceCounter(&time2);   // останавливаю таймер
resD = (time2.QuadPart - time1.QuadPart)/freqD;

ReadFile(COMport, bufrd, 1, &temp, &overlapped); //прочитать байты из порта в буфер программы