易语言QQ飞票源码

系统结构:生成,置图片数据到剪辑板,打开剪辑板_,关闭剪辑板_,清空剪辑板_,置剪辑板数据_,确定格式是否可用_,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ 生成
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 置图片数据到剪辑板
           |  |
           |  |------ _画板1_鼠标位置被移动
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   打开剪辑板_
           |  |
           |  |---[dll]------   关闭剪辑板_
           |  |
           |  |---[dll]------   清空剪辑板_
           |  |
           |  |---[dll]------   置剪辑板数据_
           |  |
           |  |---[dll]------   确定格式是否可用_

调用的DLL命令:

.DLL命令 打开剪辑板_, 逻辑型, "user32.dll", "OpenClipboard", , 打开CLIPBOARD
    .参数 剪贴板句柄, 整数型

.DLL命令 关闭剪辑板_, 整数型, "user32.dll", "CloseClipboard"

.DLL命令 清空剪辑板_, 整数型, "user32.dll", "EmptyClipboard"

.DLL命令 置剪辑板数据_, 整数型, "user32.dll", "SetClipboardData", , HANDLE WINAPI SetClipboardData
    .参数 uFormat, 整数型, , __in UINT uFormat,
    .参数 hMem, 整数型, , __in_opt HANDLE hMem,

.DLL命令 确定格式是否可用_, 逻辑型, "user32", "IsClipboardFormatAvailable"
    .参数 wFormat, 整数型