e语言资源管理器(超文本浏览框)

资源管理器(超文本浏览框).版本 2 .支持库 HtmlView .子程序 EnumChildProc, 逻辑型 .参数 hwnd, 整数型 .参数 lParam, 整数型 .局部变量 类名1, 文本型 .局部变量 标题1, 文本型 类名1 ＝ 取空白文本 (20) GetClassNameA (hwnd, 类名1, 20) .如果真 (类名1 ＝ “SysListView32”)     标题1 ＝ 取空白文本 (20)     GetWindowTextA (hwnd, 标题1, 20)     .如果真 (标题1 ＝ “FolderView”)