易语言创建窗口源码

创建窗口系统结构:注册类名,建立窗口,窗口函数,分配内存,取模块句柄,载入图标,载入鼠标,创建窗口,注册窗口类,获取消息,缺省窗口函数,显示窗口,时钟,消息,翻译消息,创建虚拟内存,消息1,传递消息,消息框, ======程序集1 || ||------注册类名 || ||------建立窗口 || ||------窗口函数 || ||------_启动子程序 || ||------分配内存 || || ======调用的Dll || ||---[dll]------取模块句柄 || ||---[dll]------载入图标 || ||---[dll]------载入鼠标 || ||---[dll]------创建窗口 || ||---[dll]------注册窗口类 || ||---[dll]------获取消息 || ||---[dll]------缺省窗口函数 || ||---[dll]------显示窗口 || ||---[dll]------时钟 || ||---[dll]------消息 || ||---[dll]------翻译消息 || ||---[dll]------创建虚拟内存 || ||---[dll]------消息1 || ||---[dll]------传递消息 || ||---[dll]------消息框 调用的DLL命令: .DLL命令取模块句柄,整数型,,"GetModuleHandleA" .参数模块名,整数型 .DLL命令载入图标,整数型,,"LoadIconA" .参数模块句柄,整数型 .参数图标句柄,整数型 .DLL命令载入鼠标,整数型,,"LoadCursorA" .参数模块句柄,整数型 .参数鼠标句柄,整数型 .DLL命令创建窗口,整数型,"user32.dll","CreateWindowExA" .参数扩展风格,整数型 .参数类名,文本型,,你刚才注册的类名 .参数窗口标题,文本型 .参数风格,整数型 .参数屏幕横坐标,整数型 .参数屏幕纵坐标,整数型 .参数宽度,整数型 .参数高度,整数型 .参数父窗口句柄,整数型,,没有就写0 .参数菜单句柄,整数型 .参数模块句柄,整数型 .参数参数,整数型 .DLL命令注册窗口类,整数型,,"RegisterClassA" .参数窗口类,窗口类 .DLL命令获取消息,整数型,"user32.dll","GetMessageA" .参数消息,整数型 .参数窗口句柄,整数型 .参数最小,整数型 .参数最大,整数型 .DLL命令缺省窗口函数,整数型,,"DefWindowProcA" .参数窗口句柄,整数型 .参数消息值,整数型 .参数参数1,整数型 .参数参数2,整数型 .DLL命令显示窗口,整数型,,"ShowWindow" .参数窗口句柄,整数型 .参数显示方式,整数型 .DLL命令时钟,整数型,,"SetTimer" .参数hwnd,整数型 .参数event,整数型 .参数out,整数型 .参数lpTimerFunc,整数型 .DLL命令消息,整数型,,"SendMessageA" .参数hwnd,整数型 .参数msg,整数型 .参数wparam,整数型 .参数lparam,文本型 .DLL命令翻译消息,整数型,,"TranslateMessage" .参数消息,整数型 .DLL命令创建虚拟内存,整数型,,"VirtualAlloc" .参数addr,整数型 .参数size,整数型 .参数type,整数型 .参数pro,整数型 .DLL命令消息1,整数型,,"SendMessageA" .参数hwnd,整数型 .参数msg,整数型 .参数wparam,整数型 .参数lparam,整数型 .DLL命令传递消息,整数型,,"DispatchMessageA" .参数msg,整数型 .DLL命令消息框,整数型,,"MessageBoxA" .参数hwnd,整数型 .参数lptext,文本型 .参数lpcaption,文本型 .参数utpye,整数型