马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？立即注册
×
361度窗口插件中的文本显示区域系列命令可以在屏幕和窗口中显示文字，相关命令有：
CreateTextRgn 创建文本显示区域
SetTextRgnStyle 设置文本显示区域样式
SendTextRgnString 发送字符串给文本显示区域
普通样式：
[按键精灵] 纯文本查看 复制代码 '在屏幕中创建文本显示区域
hwnd = Plugin.WndEx7_20.CreateTextRgn(0, 30, 30, 100, 50)
'设置文本显示区域样式
Call Plugin.WndEx7_20.SetTextRgnStyle(hwnd, "00FF00", "000000", "宋体", 12, 0, 0)
'设置文本显示区域字符串
Call Plugin.WndEx7_20.SendTextRgnString(hwnd,"文本显示区域普通样式ABCDEFG" & vbCrLf & "HIJKLMNOPQRSTUVWXYZ")
Do
Delay 500
Loop
'OnScriptExit过程在脚本结束时执行，即使脚本执行到一半的时候，你按了停止热键，它也会执行了这个过程再停止
Sub OnScriptExit()
'关闭文本显示区域
Call Plugin.WndEx7_20.SetWindowState(hwnd, 0)
End Sub
运行效果：
向下滚动样式+彩色：
[按键精灵] 纯文本查看 复制代码 '在屏幕中创建文本显示区域
hwnd = Plugin.WndEx7_20.CreateTextRgn(0, 30, 30, 200, 80)
'设置文本显示区域样式
Call Plugin.WndEx7_20.SetTextRgnStyle(hwnd, "00FF00", "0000FF", "宋体", 12, 0, 2)
Do
'设置文本显示区域字符串
Call Plugin.WndEx7_20.SendTextRgnString(hwnd,"向下滚动样式 [/C:FF0000]" & Now())
Delay 1000
Loop
'OnScriptExit过程在脚本结束时执行，即使脚本执行到一半的时候，你按了停止热键，它也会执行了这个过程再停止
Sub OnScriptExit()
'关闭文本显示区域
Call Plugin.WndEx7_20.SetWindowState(hwnd, 0)
End Sub
运行效果：
向上滚动样式+彩色+背景透明：
[按键精灵] 纯文本查看 复制代码 '在屏幕中创建文本显示区域
hwnd = Plugin.WndEx7_20.CreateTextRgn(0, 80, 30, 200, 80)
'设置文本显示区域样式
Call Plugin.WndEx7_20.SetTextRgnStyle(hwnd, "TRP", "0000FF", "宋体", 12, 0, 4)
Do
'设置文本显示区域字符串
Call Plugin.WndEx7_20.SendTextRgnString(hwnd,"向上滚动样式 " & Now())
Delay 1000
'设置文本显示区域字符串
Call Plugin.WndEx7_20.SendTextRgnString(hwnd,"[/C:00FF00]向上滚动样式 " & Now())
Delay 1000
Loop
'OnScriptExit过程在脚本结束时执行，即使脚本执行到一半的时候，你按了停止热键，它也会执行了这个过程再停止
Sub OnScriptExit()
'关闭文本显示区域
Call Plugin.WndEx7_20.SetWindowState(hwnd, 0)
End Sub
运行效果：
脚本中使用的361度窗口插件下载：
http://pan.baidu.com/s/1ntQswaP
本文转载于361度插件作者博客
http://bg361.blog.163.com/blog/ | 
发表于 2018-10-11 19:09:29
发表于 2020-10-25 21:21:02
