为什么TC做出来的脚本老是应用程序出错。

ligancai · 发表于 2012-9-7 17:57:11

马上加入TC

您需要登录才可以下载或查看，没有帐号？立即注册

x

自己用没事,发给别人用就出现应用程序出错。。。。
怎么解决？

#import "dm.dmsoft" dm
空间开卡片
//定义默认空间

//定义默认空间
整型线程句柄
整型枚举窗口
整型线程状态
功能逻辑型测试1()
整型窗口句柄
整型 hwnd
string str
int name
整型鼠标所在窗口句柄
整型 WheelDown

窗口句柄=窗口.鼠标所在窗口句柄()
如果(窗口句柄==0) //判断是否获取到了窗口句柄
辅助.消息框("没有获取到窗口句柄!")
否则
窗口.激活(窗口句柄)
辅助.等待(200)
窗口.还原(窗口句柄)
辅助.等待(200)
//窗口.还原(窗口句柄字符串)
//窗口.设置位置(窗口句柄,0,0)
辅助.等待(200)
整型是否绑定成功
是否绑定成功=dm.BindWindow(窗口句柄,"normal","windows","windows",0)
如果(是否绑定成功==0)
辅助.消息框("绑定失败！")
如果结束
如果结束

循环(真)
如果(单选框.获得状态("单选框0"))
dm.MoveTo(422,191)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束
如果(单选框.获得状态("单选框1"))
dm.MoveTo(553,202)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束
如果(单选框.获得状态("单选框2"))
dm.MoveTo(685,199)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束
如果(单选框.获得状态("单选框3"))
dm.MoveTo(426,376)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束
如果(单选框.获得状态("单选框4"))
dm.MoveTo(552,369)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束

如果(单选框.获得状态("单选框5"))
dm.MoveTo(679,368)
dm.LeftDoubleClick()
dm.KeyPress(13)
dm.KeyPress(27)
如果结束
循环结束
返回真
//函数返回语句
功能结束

功能逻辑型热键0_热键()
//这里添加你要执行的代码
如果(线程状态!=1)
线程句柄=线程.开启("开卡片.测试1","")
线程状态=1
如果结束
返回真
//函数返回语句
功能结束

功能逻辑型热键1_热键()
如果(线程状态==1)
//这里添加你要执行的代码
线程.关闭(线程句柄)
线程状态=0
如果结束
返回真
功能结束

功能逻辑型退出_点击()
//这里添加你要执行的代码
辅助.退出()

返回真
//函数返回语句
功能结束

空间结束
//空间结束语句