记账软件版1楼: 串口通讯用的是creatfile 函数 打开串口.
可是经常出现 串口打开失败的情况. 重启程序不管用.重启电脑又可以打开了!!!!
begin
dwShareMode:=0;
end;

m_hComm := CreateFile( //创建文件（串口），取得操作句柄
PChar(sCommPort), //文件名称
//＇＇＼＼.＼COM10＇＇,
GENERIC_READ or GENERIC_WRITE, //操作方式(读或写)
dwShareMode, //共享方式
nil, //SD
OPEN_EXISTING, //文件创建方法
FILE_ATTRIBUTE_NORMAL, //文件属性
0); //handle to template file

2楼: 端口打开后没有正确释放，或者根本就没有释放 如速达财务软件售后

3楼: 我用了CloseHandle(self.m_hComm);
不知道是不是释放不成功啊!!
有什么好的建议吗？
我正在调试!

4楼: 能不能在打开串口前, 先关闭一次串口？
可是打开串口前, 定义的句柄是空的,不知道如何取得某个串口的地址,比如com1,能否不用句柄,直接关闭com1口？

5楼: 可以采用 try catch语句试试

6楼: 问题解决了，我换了台电脑就好了，是电脑的故障吧！对everhappy表示感谢！