Как узнать, есть ли в приёмном буфере RS232 данные
При помощи функции ClearCommError можно узнать, сколько байт данных находится в буфере приёма (и буфере передачи) последовательного интерфейса.
procedure DataInBuffer(Handle: THandle;
var InQueue, OutQueue: integer);
var
ComStat: TComStat;
e: integer;
begin
if ClearCommError(Handle, e, @ComStat) then
begin
InQueue := ComStat.cbInQue;
OutQueue := ComStat.cbOutQue;
end
else
begin
InQueue := 0;
OutQueue := 0;
end;
end;
|
|
|
|
|
Ceramica magica, плитка ванна. Керамическая плитка для ванной (CERIM. . недвижимость в Красногорске московской области . Mart Monger: ИНТЕРНЕТ-МАГАЗИН В АРЕНДУ . Железные двери mul-t-lock цилиндры. Металлические двери mul-t-lock цилиндры. . КА - ищем персонал: плетеные изделия. Ковры, циновки, дорожки. . |
