13问答网 > 那我告诉能给我讲讲VB中的BitBlt函数。给一个具体例子。谢谢了。一定多多奖励

那我告诉能给我讲讲VB中的BitBlt函数。给一个具体例子。谢谢了。一定多多奖励

2025-03-04 03:38:01

推荐回答（1个）

回答1：

function BitBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc: Integer; Rop: DWORD): BOOL; stdcall;

DestDC待画位图的handl,
x,y为待画位图的原点坐标，
Width, Height为待画位图的区域大小，
SrcDC为被东东的handl,
XSrc, YSrc为被画东东的原点坐标

width := Screen.Width div 8;
height := Screen.Height div 8;
BitBlt(bipmap.Canvas.Handle, 0, 0, width, height, DC, 1*width{原点x坐标}, 0*height{原点y坐标}, SRCCOPY);