经测试 代码少定义一个j:boolean;
可以发送数据

解决方案 »

  1.   


    哦,确实可以通信,硬件连接有问题,j 被我声明在前面了!还有就是SPCOMM控件是不是不能识别COM10以上的串口设备啊,我这边就是这样的,网上说也有这样的问题!!!
      

  2.   

    需要修改SPComm.pas文件
    原来
    hNewCommFile := CreateFile( PChar(FCommName),
                                     GENERIC_READ or GENERIC_WRITE,
                                     0, {not shared}
                                     nil, {no security ??}
                                     OPEN_EXISTING,
                                     FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,
                                     0 {template} );
    修改后
    hNewCommFile := CreateFile( PChar('\\.\' + FCommName),
                                     GENERIC_READ or GENERIC_WRITE,
                                     0, {not shared}
                                     nil, {no security ??}
                                     OPEN_EXISTING,
                                     FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,
                                     0 {template} );
      

  3.   


    PChar('\\.\' + FCommName),
    为什么加上'\\.\'就行了呢????