本帖最后由 jhting 于 2009-09-15 23:24:05 编辑

解决方案 »

  1.   

    function ConnetDrv(DrvSnr, DrvType: byte; var sRt: Byte; TCP: Byte;
    var dNum :Dword; var dVAR: byte ; var dSType: byte; tOver: Integer): Byte; 
      

  2.   


    function ConnetDrv(DrvSnr, DrvType: byte; var sRt: Byte; TCP: Byte; 
    var dNum :Dword; var dVAR: byte ; var dSType: byte; tOver: Integer): Byte; stdcall;
    这样可行吧
      

  3.   

    感谢大家的关注!!写了一天才写了这几个DLL的接口!!!! 厂家给的说明不也不详细,就拿这个函数来说,前面两个参数,有时可能在DELPHI中用BYTE,有时又要用INTEGER才行!!!真HAN,基本要一个一个参数的试!!!!