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

WaitCommEvent(ComFile,Mask,@Overlapped)   Найти похожие ветки 

← →
POP   (2006-09-17 21:05) [0]

Если я использую WaitCommEvent с Overlapped , нужно ли чтобы Overlapp.hEvent было уже заполнено функцией CreateEvent или достаточно предварительно установить SetCommmask и все?

Или CreatEvent используется только для ReadFile/WriteFile и непосредственно перед ними?


← →
Kolan ©   (2006-09-17 22:02) [1]


> заполнено функцией CreateEvent

Это как?
CreateEvent - создает объект ядра.


← →
POP   (2006-09-18 01:25) [2]


> Это как?
> CreateEvent - создает объект ядра.


Для WaitCommEvent с Overlapped тоже оказалось надо создавать событие в Overlapp.hEvent.

Я ожидание пришедшего байта сделал так:

----
SetCommMask(ComFile,EV_RXCHAR);
 Overlapped.hEvent:= CreateEvent(nil, false, false, nil);
 WaitCommEvent(ComFile,Mask,@Overlapped);
 if WaitForSingleObject(Overlapped.hEvent,50) = WAIT_OBJECT_0 then
   if GetOverlappedResult(ComFile, Overlapped, n, false) = true then
     Goto okk;
 Memo1.Lines.Add("Error. COM port does not answer...");
 Goto endd;
---

Мне кажется это через одно место получилось, зато работает.


← →
medved_68 ©   (2006-09-18 13:58) [3]


> Я ожидание пришедшего байта сделал так:
>
> ----
> SetCommMask(ComFile,EV_RXCHAR);
>  Overlapped.hEvent:= CreateEvent(nil, false, false, nil);
>
>  WaitCommEvent(ComFile,Mask,@Overlapped);
>  if WaitForSingleObject(Overlapped.hEvent,50) = WAIT_OBJECT_0
> then
>    if GetOverlappedResult(ComFile, Overlapped, n, false)
> = true then
>      Goto okk;
>  Memo1.Lines.Add("Error. COM port does not answer...");
>  Goto endd;
> ---
>
> Мне кажется это через одно место получилось, зато работает.
>

Да можно было проще:

ReadFile(HComm,Buff,1,nb,@Reading);
if WaitForSingleObject(Readin.hEvent,50) = WAIT_OBJECT_0
then begin
.....делаешь что то по приему 1 байта
end
else делаешь что то если байт не принят по истечении 50 мс;

И без всяких  масок и WaitCommEven"ов
Нафига ставить ожидание приема первого байта, если ты и так считываешь только его. И вообще нафига пользоваться АПИ функциями, если не понимать, как они работают и что они делают???



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

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



Память: 0.45 MB
Время: 0.025 c
1-1156764443
Mameluke
2006-08-28 15:27
2006.10.08
Масштабирование окна


2-1159108026
learner
2006-09-24 18:27
2006.10.08
Определение имен типов объектов.


2-1158848258
Касабланка
2006-09-21 18:17
2006.10.08
Pascal


5-1140419056
DimaBr
2006-02-20 10:04
2006.10.08
Закрытие узла.


3-1154959675
VadimSpb
2006-08-07 18:07
2006.10.08
Индикатор при выполнении запроса




   Наверх