发表评论(0)作者:, 平台:, 阅读:16886, 日期:2000-03-12
用Visual Basic 定制BMP文件
吉林 韩冰
在用VB编制绘图程序时,有时需要将窗体或图片框上的绘图结果形成一个定制
的图形文件保存起来,以便以后浏览或修改。这一功能可以用VB本身带有的
SavePicture语句来完成。
SavePicture语句将窗体、图象控件或图片框中的图形图象保存到磁盘上的一
个文件中,这些图象可以是使用画图方法(Line,Circle,Pset)设计出来的,也
可以存储那些通过设置窗体或图片框的图片属性或者通过PaintPicture方法或Load
?Picture函数载入的图象。这些载入的图象可以是BMP、ICO或WMF图形文件。
SavePicture语句的语法格式如下:
SavePicture picture,stringexpression,参数picture为窗体或图片框的
picture或image属性;
参数strngexpression为保存的文件名。
下面举一个具体的程序来说明定制图象文件的过程:
1 创建一个新的项目文件,在Forml中加入一个图象控件Picturel,将
Picture1的AutoRedraw属性设置为True。
2.在Form-Load()事件中,加入如下代码:
Private Sub Form-Load()
Dim CX As Integer
Dim CY As Integer
Dim Limit As Integer
Dim Radius As Integer
CX=1000
CY=1000
For Radius=0 To Limit
Picturel.Circle(CX,CY),Radius,RGB(Rnd* 255,Rnd* 255,Rnd*255)
Next Radius
SavePicture Picturel.Image,"c:\custom.bmp"
End Sub
执行此程序就会把图片框Picturel上的图象保存在C盘根目录下custom.bmp图
象文件中。
最后有两点需要指出:
1.在使用SavePicture语句之前,必须先将窗体或图片框的AutoRedraw属性设
为True,否则保留的将是一张空图。
2.使用Image属性保存的用画图命令(如Line,Cirele,Pset或Print)画出
来的图形总是以BMP文件格式保存。但在程序设计时如果使用窗体或图片框的
Picture属性载入或在程序运行时通过LoadPicture函数载入的图象,使用
SavePicture语句存储时,存储的文件格式同其载入前的文件格式一样(如ICO格式
等)。
吉林 韩冰
在用VB编制绘图程序时,有时需要将窗体或图片框上的绘图结果形成一个定制
的图形文件保存起来,以便以后浏览或修改。这一功能可以用VB本身带有的
SavePicture语句来完成。
SavePicture语句将窗体、图象控件或图片框中的图形图象保存到磁盘上的一
个文件中,这些图象可以是使用画图方法(Line,Circle,Pset)设计出来的,也
可以存储那些通过设置窗体或图片框的图片属性或者通过PaintPicture方法或Load
?Picture函数载入的图象。这些载入的图象可以是BMP、ICO或WMF图形文件。
SavePicture语句的语法格式如下:
SavePicture picture,stringexpression,参数picture为窗体或图片框的
picture或image属性;
参数strngexpression为保存的文件名。
下面举一个具体的程序来说明定制图象文件的过程:
1 创建一个新的项目文件,在Forml中加入一个图象控件Picturel,将
Picture1的AutoRedraw属性设置为True。
2.在Form-Load()事件中,加入如下代码:
Private Sub Form-Load()
Dim CX As Integer
Dim CY As Integer
Dim Limit As Integer
Dim Radius As Integer
CX=1000
CY=1000
For Radius=0 To Limit
Picturel.Circle(CX,CY),Radius,RGB(Rnd* 255,Rnd* 255,Rnd*255)
Next Radius
SavePicture Picturel.Image,"c:\custom.bmp"
End Sub
执行此程序就会把图片框Picturel上的图象保存在C盘根目录下custom.bmp图
象文件中。
最后有两点需要指出:
1.在使用SavePicture语句之前,必须先将窗体或图片框的AutoRedraw属性设
为True,否则保留的将是一张空图。
2.使用Image属性保存的用画图命令(如Line,Cirele,Pset或Print)画出
来的图形总是以BMP文件格式保存。但在程序设计时如果使用窗体或图片框的
Picture属性载入或在程序运行时通过LoadPicture函数载入的图象,使用
SavePicture语句存储时,存储的文件格式同其载入前的文件格式一样(如ICO格式
等)。