Hook一键更改易语言组件类名

有些程序是不容许有易语言程序运行的，有部分是根据_EL_类名前缀辨别的。

ApiHook.StopHook () ' 停止拦截API
lpClassName_ ＝ lpClassName
.如果 (寻找文本 (lpClassName, “_EL”, , 假) ≠ -1) ' EL是易语言组件的前缀类名（5.92实测）
wc.cbSize ＝ 12 × 4
GetClassInfoExA (hInstance, lpClassName, wc) ' 获取类信息
lpClassName_ ＝ 子文本替换 (lpClassName, “_EL”, “_BXV”, , , 真)
wc.lpszClassName ＝ lpClassName_ ' 更改前缀为 _BXV
RegisterClassExA (wc) ' 注册类
返回值 ＝ CreateWindowExA (dwExStyle, wc.lpszClassName, lpWindowName, dwStyle, x, y, nWidth, nHeight, hWndParent, hMenu, hInstance, lpParam) ' 创建主窗口
ApiHook.UninstallApiHook () ' 卸载APIHOOK
.否则
返回值 ＝ CreateWindowExA (dwExStyle, lpClassName_, lpWindowName, dwStyle, x, y, nWidth, nHeight, hWndParent, hMenu, hInstance, lpParam)
.如果结束
UnregisterClassA (lpClassName_, 0) ' 反注册类
ApiHook.BeginHook () ' 开始拦截API