易语言顶部工具栏源码

系统结构:子程序_工具条加入按钮,子程序_背景图,子程序_工具条WndProc,子程序_取消指针,子程序_工具条回调函数,SetWindowLongA,CallWindowProcA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 子程序_工具条加入按钮
           |  |
           |  |------ 子程序_背景图
           |  |
           |  |------ _画图时钟_周期事件
           |  |
           |  |------ 子程序_工具条WndProc
           |  |
           |  |------ 子程序_取消指针
           |  |
           |  |------ __启动窗口_被隐藏
           |  |
           |  |------ __启动窗口_被显示
           |  |
           |  |------ 子程序_工具条回调函数
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   CallWindowProcA

调用的DLL命令:

.DLL命令 SetWindowLongA, 子程序指针, "user32", "SetWindowLongA", 公开, 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 hwnd, 整数型, , 欲为其取得信息的窗口的句柄
    .参数 nIndex, 整数型, , 请参考GetWindowLong函数的nIndex参数的说明
    .参数 dwNewLong, 子程序指针, , 由nIndex指定的窗口信息的新值;

.DLL命令 CallWindowProcA, 整数型, "user32", "CallWindowProcA", 公开, 将消息传答窗口函数
    .参数 lpPrevWndFunc, 子程序指针
    .参数 hwnd, 整数型
    .参数 msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型