|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
GetPointXY.dll,vb中调用正常,用dllCall调用就不对,
VB代码:
Private Declare Function GetPoint Lib "D:\GetPointXY.dll" (ByVal sName As String, ByRef x As Long, ByRef y As Long) As Long
Sub t()
GetPoint "张某人", x, y
End Sub
TC代码:(运行没反应)
var x,y,sDllFile ,sName
sName="请设置点位置"
sDllFile= "d:\\GetPointXY.dll"
sleep(500)
dllcall(sDllFile,"pchar *",sName,"long","GetPoint","plong",x,"plong",y)
TC代码:(运行还是没反应)
var x,y,sDllFile
sDllFile= "d:\\GetPointXY.dll"
sleep(500)
dllcall(sDllFile,"char *",="请设置点位置","long","GetPoint","plong",x,"plong",y)
我应该怎么调用?
|
|