Foxtable(狐表) → 用户栏目 → 专家坐堂 → 开fa piao税控机软件，如何实现模拟按键操作？


  共有3767人关注过本帖树形打印复制链接

主题：开fa piao税控机软件，如何实现模拟按键操作？
帅哥哟，离线，有人找我吗？
guosheng
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		开fa piao税控机软件，如何实现模拟按键操作？  发帖心情 Post By：2022/3/10 16:12:00 [显示全部帖子]

1、如果开fa piao软件未打开，则模拟双击，打开税控软件。----如何用命令打开这个软件，如何判断软件是否打开状态？
2、根据手工开piao按键的顺序，识别电脑屏幕中 按键 或 标签的位置，并键盘模拟输入piao面信息。----如何在电脑屏幕中识别 文字（判断按键或标签所在位置），如何移动光标到待录入的文本框中，模拟键盘录入文字信息如何操作啊（感觉还得判断电脑目前的输入法对不对）？
[此贴子已经被作者于2022/3/10 16:12:54编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/10 16:44:00 [显示全部帖子]

如何在电脑屏幕中识别 文字（判断按键或标签所在位置）---
是否可以将电脑屏幕当成一张图片，然后调用百度或阿里的AI识别接口进行识别（不知道怎么实现）？这个被识别出来的位置不知道该怎么记录（是电脑的像素吗）？
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 9:11:00 [显示全部帖子]

电脑截屏的图片，通过调用百度的接口，将文字识别出来了。
该如何记录某些特定文字所在的位置，以便能够实现点击或移动光标啊。
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 9:44:00 [显示全部帖子]

 识别出了  “信息”
----文字在图片中的位置: 左边距=54,上边距=16,宽度=83,高度=25


如何在识别的位置区域内，实现模拟 “单击鼠标” 的动作啊？
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 10:37:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20220311103318.png
图片点击可在新窗口打开查看

已经实现将鼠标焦点聚焦到文本输入框中了（把识别出来的“信息”所在位置的长，加了10，再模拟单击鼠标）。
怎么把 一段文字 输入到框中啊？


帮助中这个用法怎么改啊？
Dim Proc As New Process
Proc.File = "C:\table.txt"
Proc.Start
Proc.WaitForInputIdle() '等程序自动结束并进入空闲状态
Sendkeys.Send("I Like Foxtable") '发送按键信息

[此贴子已经被作者于2022/3/11 10:38:59编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 10:56:00 [显示全部帖子]

聚焦鼠标焦点后，执行Sendkeys.Send，两个messagebox提示框都跳出来，但是 I Like Foxtable 没录入进去（也没报错），咋回事啊？

messagebox.show(11)
Sendkeys.Send("I Like Foxtable")
messagebox.show(12)
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 11:06:00 [显示全部帖子]

下面这个录入操作，该怎么改啊，多谢了。

SetCursorPos (950, 391) '  鼠标位置
mouse_event( MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0) '点击
mouse_event (MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)

Sendkeys.Send("I Like Foxtable")
 回到顶部
帅哥哟，离线，有人找我吗？
guosheng
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00 		  发帖心情 Post By：2022/3/11 13:02:00 [显示全部帖子]

我测试，在textbox的 mousedown事件加上，Sendkeys.Send("I like foxtable")，同样没有实现文本录入。在录入文本框时，除了用Sendkeys，还有别的实现方式吗？还是Sendkeys在此处用法有误啊？

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.11719 秒, 5 次数据查询