利用BitBlt来分割、保存16幅位图。
比如第一幅:
bmp1 :=TBitmap.Create;
bmp1.width :=image1.picture.bitmap.width div 4;
bmp1.height:=image1.picture.bitmap.height div 4;
BitBlt(bmp1.canvas.handle,0,0,bmp1.width,bmp1.height,
image1.picture.bitmap.canvas.handle,0,0,srccopy);
这就是第一幅,以后的类推了。