如何将Picture1里的图像和image里的图像保存?
我在Picture1控件里画了个image控件和一个image控件.Picture1里是一个背景图,image里是一个前景图 怎么样 将他们保存为一张图像???
[解决办法]
我以前做过一个类似功能的程序，需要借助一个picture和API函数 BitBlt
1、将原来的picture1，AutoDraw属性设为False
2、在窗体上加一个picture2，AutoDraw属性设为True
3、加一个command1，由于测试
添加以下代码
Private Declare Function BitBlt Lib "gdi32 " (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Private Sub Command1_Click()
BitBlt Picture2.hDC, 0, 0, 200, 200, Picture1.hDC, 0, 0, vbSrcCopy '宽度、高度自己定
Picture2.Refresh
SavePicture Picture2.Image, "c:\try.bmp "
End Sub
要成功保存图像必须注意以下几点：
1、Picture1的AutoReDraw属性必须为false，否则image的图像不保存
2、Picture2的AutoReDraw属性必须为True,才能获得两个图像的copy
3、保存时应该用Picture2的image属性而不是picture属性
