取鼠标当前所在目录

句柄 ＝ 窗口_取祖句柄 (窗口_取鼠标处窗口句柄 ())
类名 ＝ 窗口_取类名 (句柄)
.判断开始 (类名 ＝ “CabinetWClass”)
窗口_枚举所有子窗口 (句柄, 子窗口数组, )
.计次循环首 (取数组成员数 (子窗口数组), i)
.如果真 (窗口_取类名 (子窗口数组 [i]) ＝ “ToolbarWindow32”)
H ＝ 窗口_取标题 (子窗口数组 [i])
.判断开始 (文本_寻找文本 (H, “地址:”, , 假) ≠ -1)
返回 (取文本右边 (H, 取文本长度 (H) － 5))
跳出循环 ()
.默认
到循环尾 ()
.判断结束

.如果真结束

.计次循环尾 ()
.判断 (文本_寻找文本 (类名, “Progman”, , 假) ≠ -1 或 文本_寻找文本 (类名, “WorkerW”, , 假) ≠ -1)
返回 (“桌面”)