易语言画板绘制列表框源码

系统结构:画控件,画板拦截,图片尺寸转换,取文本占用像素,宽度至文本长度,画滚动条,置个人资料,被选中高度,未选中高度,被选中颜色,对接,画头像,画星星,画月亮,画太阳,画好友,画组,记录,添加好友到组,添加组到组列表,刷新显示,设置窗口信息,返回窗口信息过程,

======窗口程序集1
           |  |
           |  |------ 画控件
           |  |
           |  |------ 画板拦截
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 图片尺寸转换
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _显示画板_被双击
           |  |
           |  |------ _显示画板_鼠标右键被按下
           |  |
           |  |------ _显示画板_鼠标左键被按下
           |  |
           |  |------ _显示画板_鼠标位置被移动
           |  |
           |  |------ __启动窗口_尺寸被改变
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ 取文本占用像素
           |  |
           |  |------ 宽度至文本长度
           |  |
           |  |------ 画滚动条
           |  |
           |  |------ _显示画板_鼠标左键被放开
           |  |
           |  |------ _时钟2_周期事件
           |  |
           |  |
======好友列表框
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 置个人资料
           |  |
           |  |------ 被选中高度
           |  |
           |  |------ 未选中高度
           |  |
           |  |------ 被选中颜色
           |  |
           |  |------ 对接
           |  |
           |  |------ 画头像
           |  |
           |  |------ 画星星
           |  |
           |  |------ 画月亮
           |  |
           |  |------ 画太阳
           |  |
           |  |------ 画好友
           |  |
           |  |------ 画组
           |  |
           |  |------ 记录
           |  |
           |  |------ 添加好友到组
           |  |
           |  |------ 添加组到组列表
           |  |
           |  |------ 刷新显示
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置窗口信息
           |  |
           |  |---[dll]------   返回窗口信息过程

调用的DLL命令:

.DLL命令 设置窗口信息, 整数型, "user32.dll", "SetWindowLongA"
    .参数 窗口句柄, 整数型
    .参数 属性, 整数型
    .参数 信息, 子程序指针

.DLL命令 返回窗口信息过程, 整数型, "user32.dll", "CallWindowProcA", 公开, 该函数CallWindowProc将消息信息传送给指定的窗口过程.使用函数CallWindowsProc可进行窗口子分类。通常来说，同一类的所有窗口共享一个窗口过程。子类是一个窗口或者相同类的一套窗口，在其消息被传送到该类的窗口过程之前，这些消息是由另一个窗口过程进行解释和处理的.SetWindowLoog函数通过改变与特定窗口相关的窗日过程，使系统调用新的窗口过程来创建子类，新的窗口过程替换了以前的窗口过程。应用程序必须通过调用CallWindowsProc来将新窗日过程没有处理的任何消息传送到以前的窗口过程中，这样就允许应用程序创建一系列窗口过程
    .参数 旧窗口过程, 整数型, , 由取窗口信息_（窗口句柄，#窗口信息之窗口过程）获取
    .参数 窗口句柄, 整数型
    .参数 消息类型, 整数型, , 指定消息类型
    .参数 参数一, 整数型, , 指定其余的、消息特定的信息。该参数的内容与Msg参数值有关
    .参数 参数二, 整数型, , 指定其余的、消息特定的信息。该参数的内容与Msg参数值有关