Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: WinAPI и системное программирование > Непрерывное чтение последовательного порта


Автор: cemick 28.12.2013, 10:18
Добрый день.  

Читаю из COM порта в асинхронном режиме с помощью Winapi. Все хорошо, кроме одного "Но"

Немного псевдо кода:

While not Terminated do   
  WaitCommEvent
  WaitForSingleObject
  GetOverlappedResult
  ReadFile

Проблема заключается в следующем, если данные в COM порт поступят после ReadFile, НО до WaitCommEvent, я не узнаю об этом, и в WaitForSingleObject буду ждать пока еще раз не будет в COM порт выполнена посылка данных. Данные не потеряются, но получу временной лаг. 
В этом и вопрос, как сделать так, что бы WaitCommEvent-WaitForSingleObject  сразу сообщили о том, что данные уже есть и неждали нового поступления данных.

Автор: Robus 30.3.2014, 04:12
Цитата(cemick @  28.12.2013,  10:18 Найти цитируемый пост)
В этом и вопрос, как сделать так, что бы WaitCommEvent-WaitForSingleObject  сразу сообщили о том, что данные уже есть и неждали нового поступления данных.

В виндовсе, по крайней мере современном, давно ушли от прерываний. Поэтому нужно создать отдельный поток в котором, в цикле, крутить чтение с порта, считывать их и класть в какой-нибудь буфер. В основном цикле проверять наличие данных в буфере в нужный и удобный для вас момент и действовать по логике работы. Если вам непосредственно нужно прерывание по приходу данных, технология та же самая, но после чтения данных вызывать процедуру из потока.
Я постоянно пишу системное ПО и использую процедуру в качестве прерывания, очень удобно и надёжно. Для полного удобства я себе сделал UNIT, который параллельно работает с 256 портами, в принципе написание ПО сводится к набору простейших процедуру типа "ComOpen, ComClose, ComSend/Read", а уже UNIT сам открывает потоки, получает данные и вызывает процедуры прерывания.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)