易语言肢解窗口源码

系统结构:肢解窗口,GetWindowRect,GetWindowLong,SetWindowLong,SetWindowPos,SetParent,MoveWindow,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _按钮_肢解_被单击
           |  |
           |  |------ 肢解窗口
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   GetWindowLong
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   SetWindowPos
           |  |
           |  |---[dll]------   SetParent
           |  |
           |  |---[dll]------   MoveWindow

调用的DLL命令:

.支持库 ogrelib

.DLL命令 GetWindowRect, 逻辑型, "user32.dll", "GetWindowRect"
    .参数 hWnd, 整数型
    .参数 lpRect, 矩形

.DLL命令 GetWindowLong, 整数型, "user32.dll", "GetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nlndex, 整数型

.DLL命令 SetWindowLong, 整数型, "user32.dll", "SetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nlndex, 整数型
    .参数 dwNewLong, 整数型

.DLL命令 SetWindowPos, 逻辑型, "user32.dll", "SetWindowPos"
    .参数 hWnd, 整数型
    .参数 hWndlnsertAfter, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 Flags, 整数型

.DLL命令 SetParent, 整数型, "user32.dll", "SetParent"
    .参数 hWndChild, 整数型
    .参数 hWndNewParent, 整数型

.DLL命令 MoveWindow, 逻辑型, "user32.dll", "MoveWindow"
    .参数 hWnd, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 bRepaint, 逻辑型