• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.3.6
软件大小:62.5M
更新时间:01-16

按键精灵iOS版
立即下载

软件版本:1.6.0
软件大小:29.2M
更新时间:07-29

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[已解决] 如何利用按键精灵实现桌面浮动文字显示 [复制链接]

1#
请教:
如何利用按键精灵2014实现桌面显示文字——如附件图示。
目前的做法是

使用按键精灵界面组件 Form1中

放置

L

abel1,Lab

e

l1用于显示文字。但Form1设置透明时,Labe

l1也变透明了,无法实现目标。


有什么更好的办法或者

按键精灵相关

插件,可以实现桌面浮动文字显示呢,最好能更改文字的颜色等。
非常感谢!在线等

本主题由 超级版主 n15976906190 于 2020/9/16 11:50:23 执行 主题分类 操作
2#

回复 1楼chiclyer的帖子

注:你好 可使用大漠插件实现插件分享----PC按键----常用插件整理[第五章][2020.05.23更新]
  1. Set dm = createobject("dm.dmsoft")
  2. ver = dm.Ver()
  3. If len(ver) = 0 Then
  4. MsgBox "請檢查大漠是否正確註冊。", 48, "執行失敗!!"
  5. ExitScript
  6. End If
  7. foobar = dm.CreateFoobarRect(hwnd, 10, 10, 100, 150)
  8. dm_ret = dm.FoobarTextRect(foobar, 5, 5, 100, 100)
  9. For n = 1 To 10000
  10. dm_ret = dm.FoobarPrintText(foobar, "測試用:" & n, "ff0000")
  11. Delay 100
  12. Next
  13. EndScript
  14. Sub OnScriptExit()
  15. dm_ret = dm.FoobarClose(foobar)
  16. dm_ret = dm.UnBindWindow()
  17. Call Plugin.Msg.Tips ("Stop!!")
  18. End Sub
复制代码
361窗口插件6.0
  1. hwnd = Plugin.WndEx6.CreateTextRgn(0, 100, 10, 200, 20)
  2. Call Plugin.WndEx6.SetTextRgnStyle(hwnd, "FFFFFF", "000000", "宋体", 12, 0, 1)
  3. Call Plugin.WndEx6.SetWindowOpacity(hwnd,"FFFFFF",255,-1)
  4. i = 0
  5. While True
  6. str = CStr(now) & " 数据" & CStr(i)
  7. Call Plugin.WndEx6.SendTextRgnString(hwnd,str)
  8. i = i + 1
  9. Delay 1000
  10. Wend
  11. Sub OnScriptExit()
  12. Call Plugin.WndEx6.SetWindowState(hwnd,0)
  13. End Sub
复制代码

最后编辑n15976906190 最后编辑于 2020-09-16 14:02:57
收徒索引 ←点击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
发新话题 回复该主题