易语言简单仿云端C按钮源码

系统结构:FindWindowExA,MoveWindow,GetWindowRect,FindWindowA,SetParent,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口_主窗口
           |  |
           |  |------ _窗口_主窗口_创建完毕
           |  |
           |  |------ _窗口_主窗口_将被销毁
           |  |
           |  |------ _时钟_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   FindWindowExA
           |  |
           |  |---[dll]------   MoveWindow
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   FindWindowA
           |  |
           |  |---[dll]------   SetParent

调用的DLL命令:

.DLL命令 FindWindowExA, 整数型, "user32", "FindWindowExA", 公开, , 在窗口列表中寻找与指定条件相符的第一个子窗口  找到的窗口的句柄。如未找到相符窗口，则返回零。会设置GetLastError
    .参数 窗口句柄1, 整数型, , 在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找）
    .参数 窗口句柄2, 整数型, , 一般可以设置为0     从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索
    .参数 窗口类名, 文本型, , 欲搜索的类名。 零表示忽略 易语言代码: 字符(0)
    .参数 窗口标题, 文本型, , 指向一个指定了窗口名（窗口标题）的空结束字符串 "按钮"

.DLL命令 MoveWindow, 整数型, "user32", "MoveWindow", 公开
    .参数 hwnd, 整数型, , 备注1无法读取，请您提供该API名报易BBS中ID号klasp完善。
    .参数 左边, 整数型, , 备注2无法读取，请您提供该API名报易BBS中ID号klasp完善。
    .参数 顶边, 整数型, , 备注3无法读取，请您提供该API名报易BBS中ID号klasp完善。
    .参数 宽度, 整数型, , 备注4无法读取，请您提供该API名报易BBS中ID号klasp完善。
    .参数 高度, 整数型, , 备注5无法读取，请您提供该API名报易BBS中ID号klasp完善。
    .参数 bRepaint, 整数型, , 备注6无法读取，请您提供该API名报易BBS中ID号klasp完善。

.DLL命令 GetWindowRect, 逻辑型, "user32.dll", "GetWindowRect", 公开, 获得整个窗口的范围矩形，窗口的边框、标题栏、滚动条及菜单等都在这个矩形内
    .参数 句柄, 整数型, , Long，想获得范围矩形的那个窗口的句柄
    .参数 Rect_, RECT_, 传址, RECT，屏幕坐标中随同窗口装载的矩形(左边,顶边,右边,底边)

.DLL命令 FindWindowA, 整数型, "user32.dll", "FindWindowA", 公开
    .参数 窗口类名, 文本型
    .参数 窗口文本, 文本型

.DLL命令 SetParent
    .参数 Hwnd, 整数型
    .参数 NhWnd, 整数型