Picture1.AutoReDraw = True Save Picture1.Image, FileName(文件名) -------------------------------------------------------------------- Made by Thirdapple's Studio(http://3rdapple.51.net/)
SavePicture Picture1.Picture,"123.bmp"
'保存图像,加入commanddialog控件 dlgSavePic.ShowSave If dlgSavePic.FileName <> "" Then SavePicture picGraph.Image, dlgSavePic.FileName End If
picture1.AutoRedraw = True
SavePicture Picture1.Picture,"F:\ok.bmp"
Save Picture1.Image, FileName(文件名)
--------------------------------------------------------------------
Made by Thirdapple's Studio(http://3rdapple.51.net/)
dlgSavePic.ShowSave
If dlgSavePic.FileName <> "" Then
SavePicture picGraph.Image, dlgSavePic.FileName
End If