Hi xanatose,
I have no idea what you try to do but anyways ...
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; CreateBitmapFromCtrl
;
CreateBitmapFromCtrl proc hwndCtrl:HWND
LOCAL hdc: HDC
LOCAL hbm: HBITMAP
LOCAL hObjOld: HGDIOBJ
LOCAL rc: RECT
invoke GetClientRect, hwndCtrl, addr rc
invoke CreateCompatibleDC, 0
.if (rax)
mov hdc, rax
.else
jmp @F
.endif
invoke CreateCompatibleBitmap, hdc, rc.right, rc.bottom
.if (rax)
mov hbm, rax
.else
invoke DeleteDC, hdc
jmp @F
.endif
invoke SelectObject, hdc, hbm
mov hObjOld, rax
invoke SendMessage, hwndCtrl, WM_PRINTCLIENT, hdc, PRF_CLIENT
invoke SelectObject, hdc, hObjOld
invoke DeleteDC, hdc
mov rax, hbm
@@:
ret
CreateBitmapFromCtrl endp
Kind Regards
Greenhorn