急！！！串口控件打开串口设备问题？

[yancx2004]

请教各位高手们：
我在电脑上插了个一拖四USB的，在每个插口上插了一个通信模块，电脑上出来了四个COM口，我用的是TComm控件，打开了其中的一个Com口，但是打开另外几个口的时候，就打不开了，请教怎样解决这个问题？我用串口工具SSCOM32.exe可以打开。
在这先谢谢各位了！！！！

[jadeluo]

串口设备名使用类似这样形式: '\\.\COM12'

[jadeluo]

用的USB转串口的转换器? 串口号是多少, 有没有大于16?

[Storm2008]

一拖四需不需要装驱动？

[yancx2004]

先谢谢各位了！！
模块要装驱动，一拖四不需要
用的就是一个USB转出四个USB口插上模块
没有大于16的，就是Com13 Com14 Com15 Com16

[Storm2008]

用个串口调试助手先试试，看看每个串口是不是都能正常收发数据。

[yancx2004]

我用SSCOM32.exe试过可以的

[Storm2008]

参数设置，有没有被其他程序占用


com12前面加个‘\’试试（记不清是\还是/了）


打不开的时候提示什么？


其他的想不出来啥原因了

[yancx2004]

好，我去试试，我先谢谢了

[yancx2004]

两位高手们：
我是用四个TComm控件打开别插在四个USB串口上的通信模块，但是我每次只能打开一个，其它三个就打不开，请问这是什么问题啊？

[lyguo]

感觉你打开一个，就占用了线路，其它三个就打不开了。

没用过，感觉 会是这样。

建议用模拟串口，自己再写个模拟设备的程序来调试程序。

[xiaocha]

估计哪里的代码有问题，仔细调试，更多串口的程序我都写过，也没发现这样的问题

[jadeluo]

[Quote=引用 9 楼 yancx2004 的回复:]
两位高手们：
我是用四个TComm控件打开别插在四个USB串口上的通信模块，但是我每次只能打开一个，其它三个就打不开，请问这是什么问题啊？
[/Quote]

把你打开那四个串口的代码帖出来看看。

[yancx2004]

Case cbxWz.ItemIndex of
1: begin
try
Comm1.StopComm;
Comm1.CommName:= cbxCom.Text;
Comm1.RtsControl:= RtsDisable;
Comm1.DtrControl:= DtrDisable;
Comm1.StartComm;
lblMsg1.Caption:= '串口 '+ cbxCom.Text + '打开成功！';
except
lblMsg1.Caption:= '串口 '+ cbxCom.Text + '打开失败！';
end;
end;
2: begin
try
Comm2.StopComm;
Comm2.CommName:= cbxCom.Text;
Comm2.RtsControl:= RtsDisable;
Comm2.DtrControl:= DtrDisable;
Comm2.StartComm;
lblMsg2.Caption:= '串口 '+ cbxCom2.Text + '打开成功！';
except
lblMsg2.Caption:= '串口 '+ cbxCom2.Text + '打开失败！';
end;
end;
3: begin
try
Comm3.StopComm;
Comm3.CommName:= cbxCom.Text;
Comm3.RtsControl:= RtsDisable;
Comm3.DtrControl:= DtrDisable;
Comm3.StartComm;
lblMsg3.Caption:= '串口 '+ cbxCom3.Text + '打开成功！';
except
lblMsg3.Caption:= '串口 '+ cbxCom3.Text + '打开失败！';
end;
end;
4: begin
try
Comm4.StopComm;
Comm4.CommName:= cbxCom.Text;
Comm4.RtsControl:= RtsDisable;
Comm4.DtrControl:= DtrDisable;
Comm4.StartComm;
lblMsg4.Caption:= '串口 '+ cbxCom4.Text + '打开成功！';
except
lblMsg4.Caption:= '串口 '+ cbxCom4.Text + '打开失败！';
end;
end;
end;
这是我的代码

[yancx2004]

TComm串口设置 波特率9600,数据位8,停止位-1,无校验。

[jadeluo]

......
Comm2.CommName:= cbxCom2.Text;
......
Comm3.CommName:= cbxCom3.Text;
......
Comm4.CommName:= cbxCom4.Text;
......

[yancx2004]

晕~~~~发生这样的错误

[jadeluo]

[Quote=引用 16 楼 yancx2004 的回复:]
晕~~~~发生这样的错误
[/Quote]

呵呵, 写代码和排错时不仔细哦