第5章 常用控件-精品·公开课件.ppt

5.3 图形控件 5.3.1 图像与图片框 5.3.2 形状与直线控件 5.3.3 图形方法 5.3.1 图像与图片框 一、图像（image) 功能: 图像框控件是一个简化的图形控件，采用图像框可以显示图片，但不能在其上进行绘图操作。 常用属性: 如下表 事件: 图像框可以响应Click事件、 DblClick事件等。 属性名 属性值 说明 Picture 字符型 用于设置在图像框中要显示的图像文件 属性窗体设置：设定Picture，查找图像文件。 代码设置： Image1.Picture=LoadPicture(c:\tu.jpg) 加载图片 Image1.Picture=LoadPicture() 清除图片 Stretch 逻辑值 决定是否调整图形的大小以适应图像框 表5-12 Image控件的常用属性 界面设计：两个命令按钮（放大和缩小）、一个图像框。 代码如下： Private Sub Form_Load() Image1.Picture=LoadPicture(App.Path+\tu.jpg) End Sub Private Sub Command1_Click() If Image1.Height 2000 Or Image1.Width 2000 Then Image1.Height = Image1.Height + 500 Image1.Width = Image1.Width + 300 End If End Sub Private Sub Command2_Click() If Image1.Height 1000 Or Image1.Width 1000 Then Image1.Height = Image1.Height - 500 Image1.Width = Image1.Width - 300 End If End Sub 例5-6 用图像框控件实现图片的显示和大小控件。 二、图片框(Picture) 功能: 图片框是一个完整的图形控件，可作为其他控件的容器，其内的控件可以随图片框一起移动 属性 属性名 属性值 说明 Autosize 逻辑值 决定是否自动调整图片框的大小以显示所有内容 Picture 字符型 用于设置在图片框中要显示的图像文件 Picture1.Picture=LoadPicture(c:\tu2.jpg) 加载图片 Picture1.Picture=LoadPicture() 清除图片 方法: ①图片框支持Print和Cls方法。可以用Print方法向图片框输出文本，并用Cls方法清除文本。 ②可使用Circle(画圆)、Line(画线)、Pset(画点)等方法在图片框中绘制图形，并用Cls方法清除所绘制的图形。 图片框与图像框的区别： 1、图片框是容器控件，而图像框不能作为容器。 2、图片框可以通过print方法显示文本，图像框不行。 3、图像框比图片框占内存少，显示速度快。 4、图片自适应方式不一样： a.图片框：AutoSize b.图像框：Stretch 5.3.2 形状与直线控件 一、Shape形状控件 功能：Shape形状控件用来画矩形、正方形、椭圆、圆等6种图形。 属性：见下表 事件：不支持任何事件。 表5-16 Shape控件的常用属性 属性名 属性值 说明 BackStyle 整型数据 设置控件的边框样式，由0~6七个整数来决定边框样式 BorderWidth 整型数据 设置控件的边框宽度 FillStyle 整型数据 设置控件的填充样式，由0~7八个整数来决定填充方式 Shape 0(默认) 设置控件外观为矩形 1 设置控件外观为正方形 2 设置控件外观为椭圆 3 设置控件外观为圆 4 设置控件外观为圆角矩形 5 设置控件外观为圆角正方形  二、Line直线控件 功能： 用来在窗体、框架和图片框中绘制水平线、垂直线等简单的线段。 属性： 见下表 事件： 不支持任何事件。  BorderStyle属性值 线形 0 透明线（） 1 实线（默认） 2 虚线（当BorderWidth设置为1时有效） 3 点线（当BorderWidth设置为1时有效） 4 点划线（当BorderWidth设置为1时有效） 5 双点划线（当BorderWidth设置为1时有效） 6 内收实线 表5-17 Line控件的BorderStyle属性 5.3.3 图形方法 一、坐标系统 1、标准的坐标系统 2、用户自定义坐标系统 1、标准的坐标系统（默认的坐标系统） 坐标原点为(0,0)，位于窗体的左上角，单位为Twip(缇