横坐标 = 取鼠标水平位置 ()
纵坐标 = 取鼠标垂直位置 ()
类名 = 取空白文本 (255)
标题1 = 取空白文本 (255)
.判断开始 (捕获 = 真)
句柄.内容 = 到文本 (WindowFromPoint (横坐标, 纵坐标)) ' GetCursorPos 获取鼠标,单签位置
类名长度 = GetClassName (到数值 (句柄.内容), 类名, 255)
类名1.内容 = 取文本左边 (类名, 类名长度)
父窗口.内容 = 到文本 (GetWindowLong (到数值 (句柄.内容), -8))
标题长度 = GetWindowText (到数值 (句柄.内容), 标题1, 255)
窗口标题.内容 = 取文本左边 (标题1, 标题长度)
下一篇 文本过滤重复封装成模块