易语言自动调节控件大小模块源码

系统结构:lpEnum记住,lpEnum恢复,恢复位置,记住位置,API_GetClientRect,API_EnumChildWindows,API_ScreenToClient,API_GetParent,API_GetWindowRect,API_MoveWindow,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ lpEnum记住
           |  |
           |  |------ lpEnum恢复
           |  |
           |  |------ 恢复位置
           |  |
           |  |------ 记住位置
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_GetClientRect
           |  |
           |  |---[dll]------   API_EnumChildWindows
           |  |
           |  |---[dll]------   API_ScreenToClient
           |  |
           |  |---[dll]------   API_GetParent
           |  |
           |  |---[dll]------   API_GetWindowRect
           |  |
           |  |---[dll]------   API_MoveWindow
  ======窗口程序集1
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ _按钮1_被单击

调用的DLL命令:

.DLL命令 API_GetClientRect, 整数型, "user32", "GetClientRect", , 返回指定窗口客户区矩形的大小  非零表示成功，零表示失败。会设置GetLastError
    .参数 窗口句柄, 整数型, , 欲计算大小的目标窗口
    .参数 矩形区域, RECT, , RECT，指定一个矩形，用客户区域的大小载入（以像素为单位）;

.DLL命令 API_EnumChildWindows, 整数型, "user32", "EnumChildWindows", , 为指定的父窗口枚举子窗口  非零表示成功，零表示失败
    .参数 hWndParent, 整数型, , 欲枚举子窗口的父窗口的句柄
    .参数 lpEnumFunc, 整数型, , 为每个子窗口调用的函数的指针。用AddressOf运算符获得函数在一个标准模块中的地址
    .参数 lParam, 整数型, , 在枚举期间，传递给dwcbkd32.ocx定制控件之EnumWindows事件的值。这个值的含义是由程序员规定的。（原文：Value that is passed to the EnumWindows event of the dwcbkd32.ocx custom control during enumeration. The meaning of this value is defined by the programmer.）;

.DLL命令 API_ScreenToClient, 整数型, "user32", "ScreenToClient", , 判断屏幕上一个指定点的客户区坐标  非零表示成功，零表示失败
    .参数 hwnd, 整数型, , 一个窗口的句柄，该窗口定义了要使用的客户区坐标系统
    .参数 lpPoint, POINTAPI, , POINTAPI，屏幕坐标系统中包含了屏幕点的结构。这个函数会随同相应的客户区坐标（由hwnd决定）载入结构;

.DLL命令 API_GetParent, 整数型, "user32", "GetParent", , 判断指定窗口的父窗口  父窗口的句柄。如窗口没有父，或遇到错误，则返回零。会设置GetLastError
    .参数 hwnd, 整数型, , 欲测试的窗口的句柄;

.DLL命令 API_GetWindowRect, 整数型, "user32", "GetWindowRect", , 获得整个窗口的范围矩形，窗口的边框、标题栏、滚动条及菜单等都在这个矩形内  非零表示成功，零表示失败。会设置GetLastError
    .参数 hwnd, 整数型, , 想获得范围矩形的那个窗口的句柄
    .参数 lpRect, RECT, , RECT，屏幕坐标中随同窗口装载的矩形;

.DLL命令 API_MoveWindow, 整数型, "user32", "MoveWindow", , 改变指定窗口的位置和大小。顶级窗口可能受最大或最小尺寸的限制，那些尺寸优先于这里设置的参数  非零表示成功，零表示失败
    .参数 hwnd, 整数型, , 欲移动窗口的句柄
    .参数 x, 整数型, , 窗口新的左侧位置
    .参数 y, 整数型, , 窗口新的顶部位置
    .参数 nWidth, 整数型, , 窗口的新宽度
    .参数 nHeight, 整数型, , 窗口的高宽度
    .参数 bRepaint, 整数型, , 如窗口此时应重画，则设为TRUE（非零）。FALSE（零）则表明应用程序会自己决定是否重画窗口;