.版本 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)) .判斷迴圈尾 ()  

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