Вниз
Скачать: CL | DM;

Блин! Во в голову вдарило-то! Вопрос про Com-порт..   Найти похожие ветки 

 
Red Alert   (2002-01-13 08:01) [0]

Читаю с порта
bResult:= ReadFile(hCom, CharArray[i], 1, dwRead, nil); // чтение одного байта из порта,но
порт в этот момент ничего не посылает и прога висит в на этой функции пока что-нить с порта не придет.
Можно ли сделать так, что если с порта ничего не идет, функция обрывалась?


 
paa713   (2002-01-13 12:14) [1]

Да можно. Даже скорее нужно !!!. Тебе надо применять ассинхронный ввод-вывод. Тогда получиьтся вот что:
1. Ты читаешь байт из порта.
2. Если он там есть, то все в порядке.
3. Если нет, то функция вернет ERROR_IO_PENDING.

Более подробно сейчас описать не могу. Нет времени. Если интересно пиши. Может даже поделюсь готовой библиотекой, если разыщу исходники.


 
Red Alert   (2002-01-14 14:34) [2]

Я проблему решил вот так, хотя твои рекомдации тоже попробую
я поставил таймаут на чтение данных
SetCommTimeOuts(hCom, setCommParam);
в структуру SetCommParam загнал таймоуты в мс
with SetCommParam do
begin
ReadIntervalTimeout:=50;
ReadTotalTimeoutMultiplier:=50;
ReadTotalTimeoutConstant:=0;
WriteTotalTimeoutMultiplier:=0;
WriteTotalTimeoutConstant:=0;
end;
Вроде работает, проверю позже на чтении с устройства


 
Varfolomey   (2002-01-19 21:44) [3]

Попробуй использовать параллельные потоки!


 
Илья   (2002-01-20 18:57) [4]

По моему SetCommTimeOuts наилучшее решение
если конечно читать порт в потоке с юзерским интерфейсом



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c
1-46442
Glonia Zbanov
2002-04-03 10:04
2002.04.15
Application.MessageBox


1-46363
Gellalina
2002-04-04 13:30
2002.04.15
Передать значение переменной из Unit1 в Unit2


3-46219
SergeyE
2002-03-22 18:48
2002.04.15
ADO 2.6


3-46222
АндрейК
2002-03-22 23:13
2002.04.15
API шные функции для работы с БД


3-46261
Delphin2
2002-03-25 08:36
2002.04.15
Базы данных




   Наверх