PB 如何从粘贴板取图
我调用了一个QQ的截图OCX,该控件双击时会把图片复制到粘贴板上,但我想再把粘贴板的图片保存起来,该怎么做?
Function int CameraSubArea(int utype) LIBRARY "CameraDll.dll"
FUNCTION ulong GetClipboardData(ulong wFormat) LIBRARY "user32.dll"
FUNCTION ulong IsClipboardFormatAvailable(ulong wFormat) LIBRARY "user32.dll"
FUNCTION ulong GlobalLock(ulong hMem) LIBRARY "kernel32.dll"
FUNCTION ulong GlobalUnlock(ulong hMem) LIBRARY "kernel32.dll"
FUNCTION ulong GlobalSize(ulong hMem) LIBRARY "kernel32.dll"
subroutine copymemory(REF blob Destionation,blob Source, long length )library"kernel32.dll"
//subroutine copymemory(REF string Destionation,string Source, long length )library"kernel32.dll"
FUNCTION ulong OpenClipboard(ulong hwnd) LIBRARY "user32.dll"
li_return_msg =CameraSubArea(0)
IF li_return_msg = 1 THEN
if IsClipboardFormatAvailable(2) = 1 then
hGlobal = GetClipBoardData(2)
lp = GlobalLock(hGlobal)
//blobtemp = space(GlobalSize(lp))
//copymemory(ref blbResult,BlobTemp,lp)
GlobalUnlock(hGlobal)
in_bitmap.of_WriteBlob("c:\1.bmp", blob(blbResult))
end if
END IF
在网上找了这么一段,但就是报错,不行
请高手帮忙一下,谢谢