1.将bmp文件,复制到剪切板:
声明API
FUNCTION ulong LoadImage(ulong hInst,string lpsz,ulong un1,ulong n1,ulong n2,ulong un2) LIBRARY "user32.dll" ALIAS FOR "LoadImageA"
FUNCTION ulong CloseClipboard() LIBRARY "user32.dll"
FUNCTION ulong OpenClipboard(ulong hwnd) LIBRARY "user32.dll"
FUNCTION ulong EmptyClipboard() LIBRARY "user32.dll"
FUNCTION ulong SetClipboardData(ulong wFormat,Ulong hMem) LIBRARY "user32.dll"
FUNCTION ulong RegisterClipboardFormat(string lpString) LIBRARY "user32.dll" ALIAS FOR "RegisterClipboardFormatA"
//以下是代码
Constant int LR_LOADFROMFILE = 16
Constant int IMAGE_BITMAP = 0
Constant int IMAGE_ICON = 1
Constant int IMAGE_CURSOR = 2
Constant int IMAGE_ENHMETAFILE = 3
Constant int CF_BITMAP = 2
Constant int CF_UNICODETEXT = 13
Constant int CF_TEXT = 1