易语言剪切板类源码

系统结构:SetText,GetTextLength,GetText,OpenClipboard,EmptyClipboard,GlobalAlloc,GlobalLock,GlobalUnlock,SetClipboardData,CloseClipboard,GetClipboardData,GlobalSize,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |
======Clipboard
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ SetText
           |  |
           |  |------ GetTextLength
           |  |
           |  |------ GetText
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   OpenClipboard
           |  |
           |  |---[dll]------   EmptyClipboard
           |  |
           |  |---[dll]------   GlobalAlloc
           |  |
           |  |---[dll]------   GlobalLock
           |  |
           |  |---[dll]------   GlobalUnlock
           |  |
           |  |---[dll]------   SetClipboardData
           |  |
           |  |---[dll]------   CloseClipboard
           |  |
           |  |---[dll]------   GetClipboardData
           |  |
           |  |---[dll]------   GlobalSize

调用的DLL命令:

.DLL命令 OpenClipboard, 整数型, , "OpenClipboard"
    .参数 hWndNewOwner, 整数型

.DLL命令 EmptyClipboard, 逻辑型, , "EmptyClipboard"

.DLL命令 GlobalAlloc, 整数型, , "GlobalAlloc"
    .参数 uFlags, 整数型
    .参数 dwBytes, 整数型

.DLL命令 GlobalLock, 整数型, , "GlobalLock"
    .参数 hMem, 整数型

.DLL命令 GlobalUnlock, 整数型, , "GlobalUnlock"
    .参数 hMem, 整数型

.DLL命令 SetClipboardData, 整数型, , "SetClipboardData"
    .参数 uFormat, 整数型
    .参数 hMem, 整数型

.DLL命令 CloseClipboard, 整数型, , "CloseClipboard"

.DLL命令 GetClipboardData, 整数型, , "GetClipboardData"
    .参数 uFormat, 整数型

.DLL命令 GlobalSize, 整数型, , "GlobalSize"
    .参数 hMem, 整数型