• 首页
  • 教程
  • 资源
  • 脚本
  • 源码库
  • 新闻
  • 卖脚本
  • 用户中心
加入收藏  返回官网
你的位置:按键精灵资源站 >> 知识库

[简单屏幕取词功能]可保存到剪切板

理论支持所有未保护以标题为文字的窗口

这个功能挺简单的,给新手学习,高手可以路过了

Hwnd = Plugin.Window.MousePoint()
If Hwnd<>0 Then
    sText = Plugin.Window.GetText(Hwnd)
    If  sText<>"" Then
        Call Plugin.Sys.SetCLB(sText)
        Call 显示提示信息("获取文本:"&sText)
    Else
        Call 显示提示信息("无法获取文本")
    End If
Else
    Call 显示提示信息("无法获取文本")
End If
Sub 显示提示信息(Text)
    ScreenX = Plugin.Sys.GetScRX()
    ScreenY = Plugin.Sys.GetScRY()
    GetCursorPos x, y
    Call Plugin.Msg.ShowScrTXT(x, y, ScreenX, ScreenY, Text, "0000FF")
    Delay 1000
    Call Plugin.Msg.HideScrTXT()
    EndScript
End Sub