怎样通过串口检测Modem的状态

Question

我怎样通过串口控件Spcomm或者通过API函数检测Modem是否处于震铃状态?

Answer 1

当然你也可以直接用DWORD($0040);

Answer 2

function TComm.GetModemring : boolean;
var
dwModemState : DWORD;
begin
result:=false;
if not GetCommModemStatus( hCommFile, dwModemState ) then
Result := false
else
begin
if dwModemState=$0040 then
result:=true;
end;
end;
hCommFile : DWORD;
hCommFile := CreateFile(pchar(CommPort),GENERIC_WRITE,0,nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);

Answer 3

hCommFile : DWORD;
hCommFile := CreateFile(pchar(CommPort),GENERIC_WRITE,0,nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0);
在串口打开的时候写吗?

Answer 4

CommPort
这个参数是不是打开的串口啊?
如Comm1