动态调用API复制整个窗口增加了事件

.如果真 (hClass_Window ≠ 0)
返回 ()
.如果真结束
' 下面的代码填写窗口类的“注册表格”
hInstance ＝ winapi (, “GetModuleHandleA”, 1, 0, ) ' 取当前应用程序的实例句柄。
窗口类.cbSize ＝ winapi (, “LocalSize”, 1, 窗口类, ) ' 要指定整个结构所占的字节数，必须
窗口类.style ＝ 位或 (#CS_HREDRAW, #CS_VREDRAW)
窗口类.hInstance ＝ hInstance
' 上面这句也可以这样：
' 窗口类.hInstance ＝ GetModuleHandle (取执行文件名 ())
' ！！注意：LoadIcon和LoadCursor的两个函数的参数都改成了整数型。
窗口类.hIcon ＝ winapi (, “LoadIconA”, 1, hInstance, 129) ' 易语言EXE文件的图标标号为129
窗口类.hCursor ＝ winapi (, “LoadCursorA”, 1, 0, #IDC_ARROW)
窗口类.hbrBackground ＝ #COLOR_BTNFACE ＋ 1 ' 也可以使用其他的Color常量，注意在后面要＋1。
窗口类.lpszClassName ＝ #新窗口类名
窗口类.lpfnWndProc ＝ &默认窗口函数
' 注册表填写好了之后，进行注册登记窗口类。
hClass_Window ＝ winapi (, “RegisterClassExA”, 1, 窗口类, )