[an error occurred while processing this directive]
|
В пакете, к примеру, AsyncPro делаеться так:
В отдельном высокоприоритетном потоке читаеться бит 6 (THR is empty, and line is idle) регистра LSR (BaseAddress+5) с помощью прямых обращений к порту:
if RS485Mode then begin
repeat
until (PortIn(BaseAddress+5) and $40) <> 0;
end;
После чего поток выдает сообщение основному процессу.
E-mail: info@telesys.ru