马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
现在想鼠标悬停于输入框上方时，就可以显示备选的内容，点一下就可以输入进去。
我之前做了一个不能实现，比较低级。请教好方法。关机就不能用。
空间 病例辅助程序
空间 病例辅助程序 //默认空间 症状个数=1 主诉位置="5243922" 病史位置="8258882"
准备输入的窗口=66762
功能 单选框0_点击() //这里添加你要执行的代码
准备输入的窗口=主诉位置 功能结束 功能 单选框1_点击() //这里添加你要执行的代码 准备输入的窗口=病史位置
//开始按钮_点击操作 功能结束 功能 开始_点击()
功能结束
//退出按钮_点击操作 功能 退出_点击()
辅助.退出() 功能结束
功能 按钮0_点击() //窗口定位 窗口句柄=窗口.找到窗口("病例辅助程序") 窗口.置顶(窗口句柄,真) 窗口句柄=窗口.找到窗口("病例辅助程序") 窗口.设置位置(窗口句柄,1,179)
功能结束
功能 按钮1_点击() //增加各系统症状到配置文件
内容=编辑框.获得文本("编辑框0") 辅助.写配置("症状","各系统症状"&症状个数,内容,"C:\\Config.ini") 症状个数=症状个数+1 //读取配置到列表框 症状个数=症状个数-1 内容=辅助.读配置("症状","各系统症状"&症状个数,"C:\\Config.ini") 列表框.增加文本("列表框0",内容) 症状个数=症状个数+1 功能结束
功能 按钮2_点击() 症状个数=1 //这里添加你要执行的代码 循环(真) 内容=辅助.读配置("症状","各系统症状"&症状个数,"C:\\Config.ini") 字符长度=字符串.长度(内容) 如果 (字符长度<1) 跳出 如果结束 列表框.增加文本("列表框0",内容) 症状个数=症状个数+1 循环结束 症状个数=1
功能结束
功能 自动运行() //代码
功能结束
功能 列表框0_左键双击() //这里添加你要执行的代码 输入文字=列表框.得到选中文本("列表框0")
窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字)
功能结束
功能 列表框1_选择改变() //这里添加你要执行的代码 输入文字=列表框.得到选中文本("列表框1") 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字) 功能结束
功能 单选框7_点击() //这里添加你要执行的代码 输入文字="小时" 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字) 功能结束
功能 单选框2_点击() //这里添加你要执行的代码 输入文字="日" 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字) 功能结束 功能 单选框3_点击() //这里添加你要执行的代码 输入文字="周" 输入文字窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字)
功能结束 功能 单选框4_点击() //这里添加你要执行的代码 输入文字="月" 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字) 功能结束 功能 单选框5_点击() //这里添加你要执行的代码 输入文字="年" 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符串(准备输入的窗口,输入文字) 功能结束
功能 滑块0_鼠标释放() //这里添加你要执行的代码 位置=滑块.得到位置("滑块0") 位置=位置/20 位置=位置+36.5 标签.设置文本("标签1",位置)
功能结束
功能 按钮3_点击() //这里添加你要执行的代码 //这里添加你要执行的代码 窗口句柄=窗口.找到窗口(" [门诊电子病历]") 窗口.发送字符(4457504,22) 功能结束
空间结束
| 
/2 
发表于 2014-9-27 17:15:40
收藏
支持
反对
楼主
