情缘劲舞团V50

系统结构:ChangeDisplaySettings,窗口可见性,置父窗口,查找窗口,窗口大小,窗口移动,MoveWindow,SetParent,InflateRect,SetWindowPos,UpdateWindow,FindWindowA,IsWindow,EnumDisplaySettings,取标题文本长度_,取窗口标题_,InternetGetConnectedState,InternetOpenA,InternetOpenUrlA,HttpQueryInfoA,InternetCloseHandle,InternetReadFile,CallWindowProcA,BringWindowToTop,寻找顶级窗口_,枚举子窗口_,枚举父窗口_,取屏幕句柄_,发送消息_,投递消息,GetWindowTextA,

======窗口程序集1

           |  |

           |  |------ _游戏窗口_将被销毁

           |  |

           |  |------ _游戏窗口_创建完毕

           |  |

           |  |------ _窗口检测_周期事件

           |  |

           |  |------ _GM公告_周期事件

           |  |

           |  |------ _滚动刷新_周期事件

           |  |

           |  |------ _检测循环_周期事件

           |  |

           |  |------ _按钮1_被单击

           |  |

           |  |------ _游戏窗口_被销毁

           |  |

           |  |

======调用的Dll

           |  |

           |  |---[dll]------   ChangeDisplaySettings

           |  |

           |  |---[dll]------   窗口可见性

           |  |

           |  |---[dll]------   置父窗口

           |  |

           |  |---[dll]------   查找窗口

           |  |

           |  |---[dll]------   窗口大小

           |  |

           |  |---[dll]------   窗口移动

           |  |

           |  |---[dll]------   MoveWindow

           |  |

           |  |---[dll]------   SetParent

           |  |

           |  |---[dll]------   InflateRect

           |  |

           |  |---[dll]------   SetWindowPos

           |  |

           |  |---[dll]------   UpdateWindow

           |  |

           |  |---[dll]------   FindWindowA

           |  |

           |  |---[dll]------   IsWindow

           |  |

           |  |---[dll]------   EnumDisplaySettings

           |  |

           |  |---[dll]------   取标题文本长度_

           |  |

           |  |---[dll]------   取窗口标题_

           |  |

           |  |---[dll]------   InternetGetConnectedState

           |  |

           |  |---[dll]------   InternetOpenA

           |  |

           |  |---[dll]------   InternetOpenUrlA

           |  |

           |  |---[dll]------   HttpQueryInfoA

           |  |

           |  |---[dll]------   InternetCloseHandle

           |  |

           |  |---[dll]------   InternetReadFile

           |  |

           |  |---[dll]------   CallWindowProcA

           |  |

           |  |---[dll]------   BringWindowToTop

           |  |

           |  |---[dll]------   寻找顶级窗口_

           |  |

           |  |---[dll]------   枚举子窗口_

           |  |

           |  |---[dll]------   枚举父窗口_

           |  |

           |  |---[dll]------   取屏幕句柄_

           |  |

           |  |---[dll]------   发送消息_

           |  |

           |  |---[dll]------   投递消息

           |  |

           |  |---[dll]------   GetWindowTextA

  

调用的DLL命令:

.支持库 eAPI

.DLL命令 ChangeDisplaySettings, 整数型, , "ChangeDisplaySettingsA"

    .参数 lpDevMode, 短整数型, 传址

    .参数 dwFlags, 整数型

.DLL命令 窗口可见性, 整数型, , "ShowWindow"

    .参数 hwnd, 整数型

    .参数 fEnable, 整数型

.DLL命令 置父窗口, 整数型, , "SetParent"

    .参数 子窗口, 整数型

    .参数 父窗口, 整数型

.DLL命令 查找窗口, 整数型, , "FindWindowA"

    .参数 lpClassName

    .参数 lpWindowName, 文本型

.DLL命令 窗口大小, 逻辑型, , "MoveWindow"

    .参数 窗口句柄, 整数型

    .参数 窗口左位置, 整数型

    .参数 窗口上位置, 整数型

    .参数 窗口宽度, 整数型

    .参数 窗口高度, 整数型

    .参数 bRepaint, 逻辑型

.DLL命令 窗口移动, 逻辑型, , "MoveWindow"

    .参数 窗口句柄, 整数型

    .参数 窗口左位置, 整数型

    .参数 窗口上位置, 整数型

    .参数 窗口宽度, 整数型

    .参数 窗口高度, 整数型

    .参数 bRepaint, 逻辑型

.DLL命令 MoveWindow, 整数型, "user32", "MoveWindow", , 改变指定窗口的位置和大小。顶级窗口可能受最大或最小尺寸的限制，那些尺寸优先于这里设置的参数  非零表示成功，零表示失败

    .参数 窗口句柄, 整数型, , 欲移动窗口的句柄

    .参数 左侧位置, 整数型, , 窗口新的左侧位置

    .参数 顶部位置, 整数型, , 窗口新的顶部位置

    .参数 新宽度, 整数型, , 窗口的新宽度

    .参数 高宽度, 整数型, , 窗口的高宽度

    .参数 是否重画, 逻辑型, , 如窗口此时应重画，则设为真（非零）。假（零）则表明应用程序会自己决定是否重画窗口;

.DLL命令 SetParent, 整数型, "user32", "SetParent", , 指定一个窗口的新父（在vb里使用：利用这个函数，vb可以多种形式支持子窗口。例如，可将控件从一个容器移至窗体中的另一个。用这个函数在窗体间移动控件是相当冒险的，但却不失为一个有效的办法。如真的这样做，请在关闭任何一个窗体之前，注意用SetParent将控件的父设回原来的那个）。返回值Long，前一个父窗口的句柄。

    .参数 hWndChild, 整数型, , 备注1无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 hWndNewParent, 整数型, , 备注2无法读取，请您提供该API名报易BBS中ID号klasp完善。

.DLL命令 InflateRect, 整数型, "user32", "InflateRect", , 这个函数用于增大或减小一个矩形的大小。x加在右侧区域，并从左侧区域减去；如x为正，则能增大矩形的宽度；如x为负，则能减小它。y对顶部与底部区域产生的影响是是类似的。返回值Long，非零表示成功，零表示失败。会设置GetLastErrora。

    .参数 lpRect, 矩形数据, , =75%RECT，欲修改的矩形

.DLL命令 SetWindowPos, 整数型, "user32", "SetWindowPos", , 这个函数能为窗口指定一个新位置和状态。它也可改变窗口在内部窗口列表中的位置。该函数与DeferWindowPos函数相似，只是它的作用是立即表现出来的（在vb里使用：针对vb窗体，如它们在win32下屏蔽或最小化，则需重设最顶部状态。如有必要，请用一个子类处理模块来重设最顶部状态。返回值Long，非零表示成功，零表示失败。会设置GetLastErrora。

    .参数 hwnd, 整数型, , 备注1无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 hWndInsertAfter, 整数型, , 备注2无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 x, 整数型, , 备注3无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 y, 整数型, , 备注4无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 cx, 整数型, , 备注5无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 cy, 整数型, , 备注6无法读取，请您提供该API名报易BBS中ID号klasp完善。

    .参数 wFlags, 整数型, , 备注7无法读取，请您提供该API名报易BBS中ID号klasp完善。

.DLL命令 UpdateWindow, 整数型, "user32", "UpdateWindow", , 强制立即更新窗口，窗口中以前屏蔽的所有区域都会重画（在vb里使用：如vb窗体或控件的任何部分需要更新，可考虑直接使用refresh方法。返回值Long，非零表示成功，零表示失败。

    .参数 hwnd, 整数型, , Long，欲更新窗口的句柄

.DLL命令 FindWindowA, 整数型, "user32", "FindWindowA", , 寻找窗口列表中第一个符合指定条件的顶级窗口（在vb里使用：FindWindow最常见的一个用途是获得ThunderRTMain类的隐藏窗口的句柄；该类是所有运行中vb执行程序的一部分。获得句柄后，可用api函数GetWindowText取得这个窗口的名称；该名也是应用程序的标题）。返回值Long，找到窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastErrora。

    .参数 lpClassName, 整数型, , String，指向包含了窗口类名的空中止（C语言）字串的指针；或设为零，表示接收任何类

    .参数 lpWindowName, 文本型, , String，指向包含了窗口文本（或标签）的空中止（C语言）字串的指针；或设为零，表示接收任何窗口标题

.DLL命令 IsWindow, 逻辑型, "user32", "IsWindow", , 判断一个窗口句柄是否有效b。返回值Long，非零表示成功，零表示失败。

    .参数 hwnd, 整数型, , Long，待检查窗口的句柄

.DLL命令 EnumDisplaySettings, 整数型, , "EnumDisplaySettingsA"

    .参数 lpszDeviceName, 整数型

    .参数 iModeNum, 整数型

    .参数 lpDevMode, 短整数型, 传址

.DLL命令 取标题文本长度_, 整数型, "user32.dll", "GetWindowTextLengthA"

    .参数 窗口句柄, 整数型

.DLL命令 取窗口标题_, 整数型, "user32", "GetWindowTextA", , 取得一个窗体的标题（caption）文字，或者一个控件的内容（在vb里使用：使用vb窗体或控件的caption或text属性）  复制到lpString的字串长度；不包括空中止字符。会设置GetLastError

    .参数 窗口句柄, 整数型, , 欲获取文字的那个窗口的句柄

    .参数 缓冲区, 文本型, 传址, 预定义的一个缓冲区，至少有cch+1个字符大小；随同窗口文字载入

    .参数 缓冲尺寸, 整数型, , lp缓冲区的长度;

.DLL命令 InternetGetConnectedState, , "Wininet.dll", "InternetGetConnectedState"

    .参数 lpdwFlags, 整数型, 传址

    .参数 dwReserved, 整数型

.DLL命令 InternetOpenA, 整数型, "Wininet.dll", "InternetOpenA"

    .参数 lpszAgent, 文本型

    .参数 dwAccessType, 整数型

    .参数 lpszProxyName, 整数型

    .参数 lpszProxyBypass, 整数型

    .参数 dwFlags, 整数型

.DLL命令 InternetOpenUrlA, 整数型, "Wininet.dll", "InternetOpenUrlA"

    .参数 hInternet, 整数型

    .参数 lpszUrl, 文本型

    .参数 lpszHeaders, 文本型

    .参数 dwHeadersLength, 整数型

    .参数 dwFlags, 整数型

    .参数 dwContext, 整数型

.DLL命令 HttpQueryInfoA, 整数型, "Wininet.dll", "HttpQueryInfoA"

    .参数 hRequest, 整数型

    .参数 dwInfoLevel, 整数型

    .参数 lpvBuffer, 整数型, 传址

    .参数 lpdwBufferLength, 整数型, 传址

    .参数 lpdwIndex, 整数型, 传址

.DLL命令 InternetCloseHandle, , "Wininet.dll", "InternetCloseHandle"

    .参数 handle, 整数型

.DLL命令 InternetReadFile, 整数型, "Wininet.dll", "InternetReadFile"

    .参数 hFile, 整数型

    .参数 lpBuffer, 字节集

    .参数 dwNumberOfBytesToRead, 整数型

    .参数 lpdwNumberOfBytesRead, 整数型, 传址

.DLL命令 CallWindowProcA, 整数型, , "CallWindowProcA"

    .参数 子程序指针, 子程序指针

    .参数 参数1, 整数型

    .参数 参数2, 整数型

    .参数 参数3, 整数型

    .参数 参数4, 整数型

.DLL命令 BringWindowToTop, 整数型, "user32.dll", "BringWindowToTop"

    .参数 窗口句柄, 整数型, , hwnd,欲带至顶部的那个窗口的句柄

.DLL命令 寻找顶级窗口_, 整数型, "user32.dll", "FindWindowA", , FindWindow,寻找窗口列表中第一个符合指定条件的顶级窗口

    .参数 窗口类名, 文本型, , lpClassName，参见相关帮助

    .参数 窗口文本, 文本型, , lpWindowName，参见相关帮助

.DLL命令 枚举子窗口_, 整数型, "user32.dll", "EnumChildWindows", , 为指定的父窗口枚举子窗口

    .参数 父窗口句柄, 整数型, , hWndParent,欲枚举子窗口的父窗口的句柄

    .参数 函数指针, 子程序指针, , lpEnumFunc,为每个子窗口调用的函数的指针

    .参数 自定义值, 文本型, , lParam,参见相关帮助

.DLL命令 枚举父窗口_, 整数型, "user32.dll", "EnumWindows", , 枚举窗口列表中的所有父窗口（顶级和被所有窗口）

    .参数 函数指针, 子程序指针, , lpEnumFunc,指向为每个子窗口都调用的一个函数的指针

    .参数 自定义数值, 整数型, , lParam,参见相关帮助

.DLL命令 取屏幕句柄_, 整数型, "user32", "GetDesktopWindow"

.DLL命令 发送消息_, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， ;    SendMessageByString是该函数的“类型security”声明形式  由具体的消息决定

    .参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄

    .参数 信息值, 整数型, , 消息的标识符

    .参数 参数一, 整数型, , 具体取决于消息

    .参数 参数二, 整数型, , 具体取决于消息;

.DLL命令 投递消息, 整数型, , "PostMessageA"

    .参数 句并, 整数型

    .参数 消息, 整数型

    .参数 a, 整数型

    .参数 b, 整数型

.DLL命令 GetWindowTextA, 整数型

    .参数 hWnd, 整数型

    .参数 buf, 文本型

    .参数 len, 整数型