| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1492 人关注过本帖
标题:给新手推荐一款图片剪贴工具,给合你的VFP程序,提高使用效率
只看楼主 加入收藏
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:285
专家分:620
注 册:2012-9-21
结帖率:96.67%
收藏
 问题点数:0 回复次数:2 
给新手推荐一款图片剪贴工具,给合你的VFP程序,提高使用效率

图片附件: 游客没有浏览图片的权限,请 登录注册


https://zh.  下载网址。
以下是配套VFP程序。在程序中随时用F1唤醒

**以下2行放在LOAD 或INIt事件
PUBLIC pub_Snipaste_
pub_Snipaste_='C:\Program Files (x86)\Snipaste 64位\Snipaste.exe'  &&你安装的地址



**以下放在你的唤醒按钮的CLICK事件


if type('pub_Snipaste_PROGRAMYX_')='U'
PUBLIC pub_Snipaste_PROGRAMYX_ &&是否运行了 抓图软件
pub_Snipaste_PROGRAMYX_=0
endif
if pub_Snipaste_PROGRAMYX_=0
if file(pub_Snipaste_)
shellexecute(0,"open",pub_Snipaste_,"","",5)
wait '请按F1截图,用鼠标选好后另存为(选JPG格式),或再按F3将选好的图片显示在当前屏幕。' window at 20,50 time 1
pub_Snipaste_PROGRAMYX_=1
else
=messagebox('此文件未安装或地址不存在。',0,message_)
pub_Snipaste_PROGRAMYX_=0
retu .f.
endif
endif
declare keybd_event in win32api short bvk,short bscan,integer dwflags,integer deextrainfo
keybd_event(112,0,0,0)
keybd_event(112,0,2,0)

&&在焦点是在表单上按F1唤醒,如果焦点不在表单上,就要点击右下角的这个Snipaste图标即可

搜索更多相关主题的帖子: VFP 图片 效率 if 推荐 
2020-07-26 17:53
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:285
专家分:620
注 册:2012-9-21
收藏
得分:0 
在图片控件的RIGHTCLICK事件写上这段程序,当我们看图片时,按右键就可以直接剪贴图片到剪贴板了.
2020-07-26 18:05
schtg
Rank: 12Rank: 12Rank: 12
来 自:Usa
等 级:贵宾
威 望:67
帖 子:1790
专家分:3389
注 册:2012-2-29
收藏
得分:0 
谢谢分享!
2020-07-26 19:05
快速回复:给新手推荐一款图片剪贴工具,给合你的VFP程序,提高使用效率
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.034289 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved