调用ActiveX控件 BSTR接口(100)

Discussion in 'ActiveX 控件' started by hgto2008, Dec 24, 2010.

  1. hg

    hgto2008 New Member Member

    第3节 接口函数详细说明BSTR WriteEPVBaseInfo(BSTR lpszDeviceId, BSTR lpszVehicleId, BSTR lpszDeviceType, BSTR lpszDirectionId, BSTR lpszDriveWayId, BSTR lpszLicense, BSTR lpszLicenseType, BSTR lpszPassDateTime,BSTR lpszRedLightbegin
    Time, BSTR lpszRedLightLast,long lSpeed, long lLargeLimitSpeed, long lMiniLimitSpeed, BSTR lpszViolationType, BSTR lpszViolationType2, long lCarLength, BSTR lpszLicenseColor, BSTR lpszCarType, BSTR lpszPicLocalPath1, BSTR lpszPicLocalPath2, BSTR lpszPicLocalPath3, BSTR lpszPicLocalPath4, BSTR lpszPicLocalPath5, BSTR lpszPicLocalPath6, BSTR lpszPicLocalPath7, BSTR lpszPicRemotePath, BSTR lpszSendType)这样调用报错:string index out of range:-1ShowMessage (htgnt1.WriteEPVBaseInfo(edt2.Text ,edt3.Text ,edt4.Text ,edt5.Text,edt6.Text ,edt7.Text,edt8.Text ,edt9.Text,edt10.Text ,edt11.Text,StrToInt(edt12.Text) ,0,0,edt15.Text,edt16.Text,0,edt18.Text ,edt19.Text,edt20.Text ,edt21.Text,edt22.Text ,edt23.Text,edt2.Text ,edt24.Text,edt25.Text ,edt26.Text,edt27.Text, ) );