易语言复制gif源码

系统结构:置剪贴板图片文件,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 置剪贴板图片文件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _CloseClipboard
           |  |
           |  |---[dll]------   _OpenClipboard
           |  |
           |  |---[dll]------   _RegisterClipboardFormat
           |  |
           |  |---[dll]------   _GlobalAlloc
           |  |
           |  |---[dll]------   _SetClipboardData
           |  |
           |  |---[dll]------   _GlobalFree
           |  |
           |  |---[dll]------   _EmptyClipboard

调用的DLL命令:

.DLL命令 _CloseClipboard, 整数型, "user32.dll", "CloseClipboard"

.DLL命令 _OpenClipboard, 整数型, "user32.dll", "OpenClipboard"
    .参数 hwnd, 整数型

.DLL命令 _RegisterClipboardFormat, 整数型, "user32.dll", "RegisterClipboardFormatA"
    .参数 lpString, 文本型

.DLL命令 _GlobalAlloc, 整数型, "kernel32.dll", "GlobalAlloc"
    .参数 wFlags, 整数型
    .参数 dwBytes, 整数型

.DLL命令 _SetClipboardData, 整数型, "user32.dll", "SetClipboardData"
    .参数 wFormat, 整数型
    .参数 hMem, 整数型

.DLL命令 _GlobalFree, 整数型, "kernel32.dll", "GlobalFree"
    .参数 hMem, 整数型

.DLL命令 _EmptyClipboard, 整数型, "user32.dll", "EmptyClipboard"