易语言 获取TeamViewerID密码 部分代码

方法一

.版本 2

.局部变量 hwnd, 整数型
.局部变量 HwndEx, 整数型
.局部变量 msg, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 数组2, 文本型, , "0"
.局部变量 二级窗口句柄, 整数型
.局部变量 三级窗口句柄, 整数型
.局部变量 四级窗口句柄, 整数型
.局部变量 ID, 文本型
.局部变量 n, 整数型
.局部变量 pw, 文本型
.局部变量 文本前数据, 文本型, , "0"
.局部变量 i, 整数型

 

.版本 2
.支持库 eAPI

清除数组 (数组)
清除数组 (数组2)
msg ＝ “父窗口句柄：” ＋ 到文本 (hwnd) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (hwnd) ＋ #换行符 ＋ #换行符 ＋ “子窗口：”
HwndEx ＝ FindWindowEx (hwnd, 0, 字符 (0), 字符 (0))
.判断循环首 (HwndEx ≠ 0)
    msg ＝ msg ＋ #换行符 ＋ 取空白文本 (4) ＋ 到文本 (HwndEx) ＋ 取空白文本 (4) ＋ 取窗口类名 (HwndEx) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (HwndEx)
    HwndEx ＝ FindWindowEx (hwnd, HwndEx, 字符 (0), 字符 (0))
.判断循环尾 ()

数组 ＝ 分割文本 (msg, #换行符, )
数组2 ＝ 分割文本 (数组 [7], “ATL:03A5F350”, )

 

二级窗口句柄 ＝ 到整数 (数组2 [1])
msg ＝ “子窗口句柄：” ＋ 到文本 (二级窗口句柄) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (hwnd) ＋ #换行符 ＋ #换行符 ＋ “子窗口：”
HwndEx ＝ FindWindowEx (二级窗口句柄, 0, 字符 (0), 字符 (0))
.判断循环首 (HwndEx ≠ 0)
    msg ＝ msg ＋ #换行符 ＋ 取空白文本 (4) ＋ 到文本 (HwndEx) ＋ 取空白文本 (4) ＋ 取窗口类名 (HwndEx) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (HwndEx)
    HwndEx ＝ FindWindowEx (二级窗口句柄, HwndEx, 字符 (0), 字符 (0))
.判断循环尾 ()

数组 ＝ 分割文本 (msg, #换行符, )
数组2 ＝ 分割文本 (数组 [5], “IncomingRemoteControlComponentView”, )
 

三级窗口句柄 ＝ 到整数 (数组2 [1])

msg ＝ “子窗口句柄：” ＋ 到文本 (三级窗口句柄) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (hwnd) ＋ #换行符 ＋ #换行符 ＋ “子窗口：”
HwndEx ＝ FindWindowEx (三级窗口句柄, 0, 字符 (0), 字符 (0))
.判断循环首 (HwndEx ≠ 0)
    msg ＝ msg ＋ #换行符 ＋ 取空白文本 (4) ＋ 到文本 (HwndEx) ＋ 取空白文本 (4) ＋ 取窗口类名 (HwndEx) ＋ 取空白文本 (4) ＋ “标题：” ＋ 取窗口标题 (HwndEx)
    HwndEx ＝ FindWindowEx (三级窗口句柄, HwndEx, 字符 (0), 字符 (0))
.判断循环尾 ()
 

.......................................

方法二代码