第11章 图形和图像.ppt

第11章图形和图像 VB除了具有方便的控件 美观的图形用户界面之外 还支持绘图功能 VB中既可以使用形状控件 直线控件制作规则图形 又可以使用内建的绘图方法绘制图形 还可以使用窗体 图片框 图像框有关控件来处理各种格式的图形文件 11 1绘制图形 一 图形控件二 图形的坐标系统三 与图形有关的属性四 使用颜色五 绘图方法六 绘图语句与Paint事件 一 图形控件 1 Shape控件此控件可以制作矩形 正方形 椭圆形 圆形 圆角矩形 圆角正方形6种形状 具体形状可由其Shape属性来决定 Shape属性 形状 BoderColor属性 边界色 BorderWidth属性 边界宽度 BorderStyle属性 边界类型 FillColor属性 填充色 FillStyle属性 填充类型 一 图形控件 BoderColor属性 边界色BorderWidth属性 边界宽度BorderStyle属性 边界类型X1 X2 Y1 Y2属性 端点坐标 2 Line控件用来制作直线 主要属性有 例11 1 曲柄滑块机构的演示案例程序1 行星的运动案例程序2 迷你电子表 3 图形控件与动画 二 图形的坐标系统 2 坐标方法 缺省坐标 对象 窗体 图片框 左上角的坐标为 0 0 水平向右为X轴 垂直向下为Y轴 坐标单位由ScaleMode属性决定 1 坐标单位ScaleMode属性 共8种 二 图形的坐标系统 2 坐标方法 自定义坐标 对象 Scale X1 Y1 X2 Y2 X1 Y1 设置对象的左上角坐标 X2 Y2 设置对象的右下角坐标 此方法的使用 将对象在X方向的坐标分成X2 X1等分 Y方向的坐标分成Y2 Y1等分 并使ScaleMode属性为0 二 图形的坐标系统 3 坐标属性坐标属性有4个 ScaleLeft ScaleTop ScaleWidth和ScaleHeight 用于改变坐标原点及该度单位的大小 ScaleLeft和ScaleTop用于设定对象左上角的坐标值 ScaleWidth和ScaleHeight用于设定对象的标尺宽度和高度 对象 Scale X1 Y1 X2 Y2 相当于 对象 ScaleLeft X1对象 ScaleTop Y1对象 ScaleWidth X2 X1对象 ScaleHeight Y2 Y1 三 与图形有关的属性 2 DrawWidth属性以像素为单位的线宽 类似于Shape控件的BorderWidth 3 DrawStyle属性决定线的虚实 类似于Shape控件的BorderStyle属性 4 FillColor属性设置填充颜色 5 FillStyle属性设置填充类型 1 DrawMode属性 决定所绘图形的真实颜色 四 使用颜色 1 颜色属性 ForeColor BackColor FillColor BorderColor 2 颜色设置 RGB函数 颜色属性 RGB Red Green Blue 分量值范围为 0 255 共有256 3 16777216种颜色 QBColor函数 颜色属性 QBColor Color Color的取值范围为 0 15 对应颜色 使用8种颜色常数 vbWhite vbRed vbGreen vbBlue vbCyan vbMagenta vbYellow vbBlack 使用颜色数值 Form1 ForeColor HFF00FF Text1 BackColor 255 五 绘图方法 注意 绘图方法只能用于Form和PictureBox1 Pset方法 用于画点 对象 Pset Step x y Color 例 圆的渐开线方程 x Cos t t Sin t y Sin t t Cos t 五 绘图方法 2 Line方法 用于画直线或矩形 对象 Line Step X1 Y1 Step X2 Y2 Color B F 说明 Color为边线的颜色 若只有B 则用FillColor来填充 填充方式取决于FillStyle 若BF都有 则用Color实填充 填充方式与FillStyle无关 例 弹簧振子 五 绘图方法 3 Circle方法 用于画圆 椭圆和圆弧对象 Circle Step x y R Col Start End Aspect 画圆对象 Circle Step x y Radius Color 画椭圆对象 Circle Step x y Radius Col Aspect Aspect 纵横半径比 Aspect 1时 长轴位于垂直方向 Aspect 1时 长轴位于水平方向 画圆弧对象 Circle Step x y Radius Col Start EndStart和End的单位为弧度 范围为 2 2 取负数时有中心连线 0为3点方向 逆时针方向旋转 两者可以省去一个 默认0到2 画椭圆弧对象 Circle Step x y R Col Start End Aspect 五 绘图方法 4 Cls方法 清除所画图形 对象 Cls 六 绘图语句与Paint事件 在一个对象被移动或放大之后 或在一个覆盖该对象的窗体被移开之后 该对象部分或全部暴露时 使用Paint过程 可以确保输出的内容在必要时能被重绘 绘制静态图形时 最好是在Paint事件中绘制 这样可以保证在窗口进行切换时不至于丢失所画内容 当然也可通过设置AutoRedraw True的方法实现自动重画 11 2显示图片 在VB中可以借助窗体Form 图像框控件ImageBox 图片框控件PictureBox显示各种类型的图片文件 其格式可以是 bmp jpg jpeg gif cur ico等 一 直接加载图片到窗体二 使用图像控件三 使用图片框控件四 PaintPicture方法 一 直接加载图片到窗体 窗体既可以用各种绘图方法 Pset Line Circle 绘制图形 也可以用于显示图片 显示图片时 可以在窗体设计阶段在属性窗口设置其Picture属性 也可以在代码编写阶段用LoadPicture函数加载图片 其格式为 LoadPicture 文件名 Me Picture LoadPicture c 素材 flower jpg 说明 若省去文件名 则清除图片 在显示图片时窗体不如图片框和图像框方便 二 使用图像控件 图像控件ImageBox不能用绘图方法绘制图形 只能用来显示图片 但在显示图片时所占用的系统资源比图片框要小 因此在只显示图片而不绘制图形的情况下 用图像框 此外图像框的Stretch属性设成True后 图片的大小会自动伸缩到图像框的大小 三 使用图片框控件 图片框PictureBox具有类似于窗体显示图片 绘制图形的功能 但其图形处理方面的属性和方法比窗体要丰富 如 AutoSize属性设置成真后 当图片框控件比实际图片小时 图片框会自动适应图片的尺寸 可以用PaintPicture方法对图片进行翻转 拉伸等处理 1 图片的显示2 输出图形和文本 制作移动的函数曲线 四 PaintPicture方法 一种对图形进行块操作的非常灵活的图形处理方法 借助这种方法可以对图形进行拉伸 压缩 翻转等处理 1 格式 对象 PaintPicturePic x1 y1 w1 h1 x2 y2 w2 h2 2 说明 绘图的对象可以是窗体 也可以是图片框 Pic是图象源 可以来自窗体 图片框或图像框中的图象 x1 y1是目标坐标 决定在对象上粘贴的起始点 w1和h1为可以选 决定在对象上粘贴的宽度和高度 x2 y2是从图象源中截取图象的起始位置坐标 w2 h2是从图象源中截取图象的宽度值和高度值 3 应用 从图象源中截取图象后 进行各种处理 案例程序举例 效果1 推出 效果5 马赛克 效果2 拉近 效果6 拉幕 效果3 推拉 效果7 滚动 效果4 百叶窗 案例程序9 圆周运动的投影 案例程序8 静态图片的特技呈现 电脑爱好者 2000 20 案例程序9 用程序绘制美丽的花 三叶玫瑰线 Asin3 Acos3 四叶玫瑰线 Asin2 四叶玫瑰线 Acos2 叶玫瑰线 Asin 2 案例程序9 用程序绘制美丽的花 一 滚动条