您现在的位置是: 软件 > 开发者网络 > 程序方舟 > 开发专栏 > VB开发 > 正文


-ASP入门到精通
-矢量图象设计三剑客
-Visual Basic精彩编程100例
-玩转Excel“单元格格式”

用VB6.0快速实现图象加柔效果
2003-04-28· ·LingLi··yesky

1 2  下一页

  
  引言

  对一副图像处理后,可以得到各种各样的效果图。比如图像的锐化图、柔化图、浮雕效果图、复古效果图、彩色便笺效果图等,只要打开Photoshop,你不能不为各种各样的效果图惊叹,一副图片竟能产生出如此之多的效果。

  本文对图像处理的特殊效果之一--加柔的实现,介绍了一种简单的算法。

  图像加柔的原理

  图像加柔效果的原理其实非常简单,可以分为以下三步进行。

  第一步:对图像进行分块并选择适当的柔化算子,柔化算子决定图像加柔的效果,加柔的基本思想是某点象素的新值,由该点象素和该点象素周围的象素值共同决定。

  第二步:根据加柔算子计算每个象素的新值。

  第三步:利用新的象素值,显示图像得到效果图。

  应该特别注意:对图像边缘象素的处理。

  编程应用

  下面我们以24位真彩图"girl.bmp"为例,给出用VB 6.0编写的程序,该程序分别在window98和Windows 2000 环境中实现,取得了良好的柔化效果。

  I、建立工程:启动VB6.0|新建工程|标准EXE;

  II、控件与菜单:这里我们一共用到2个Microsoft Common Dialogue、1个Progress Bar和2个picture box、2个Label和一个含有二级的菜单。选择视图 | 工具栏 | 标准,在form1上画出picturebox1,picturebox2,lable1和label2;把鼠标移在工具箱上,单击左键,在弹出菜单,选取"部件",在"控件"上,选中"Microsoft Common Dialog 6.0"和"Microsoft Windows Common Controls 6.0"前面的复选框。再"应用"这时,你已经具备了所有控件。下面我们来建立菜单:选择视图 | 工具栏 | 窗体编辑器,建立一级菜单"文件","图像效果";在"文件"下,建立二级菜单"打开文件""保存文件"和"退出系统"。在"图像效果"下,建立二级菜单"柔化"。

  III、调整控件后锁定,设置控件属性:

  form1.Caption= "对24位真彩色图像加柔" 图1:建立好的界面



Picturebox2.ScaleMode= 3 'Pixel;
Picturebox1. ScaleMode =3 'Pixel
Lable1.Caption = "原 图"; lable2.caption="柔 化 图"

1 2  下一页

【责任编辑:方舟】
【发表评论】【关闭窗口】
■ 相关内容
 VB编荧屏焰火"屏保"程序
 VB6.0设计真正实用的TreeView控件
 VB环境下Video/Audio压缩数据流播放技术
 巧解VB安装程序制作
 优化之路:精简VB程序的代码
 利用VB驱动pcAnyWhere进行自动文件传输
 用VB实现窗口图标最小化到通知栏
 VB6实现局域网多站点互连完全手册
 如何实现VB与EXCEL的无缝连接
 FSO对象模型在VB中的应用
 如何编写高质量的VB代码
 VB多类图片数据库存取技巧
 用VB6设计有趣的动画场景
 用VB设计有安全认证服务的Email
 VB串口使用心得两则
感谢 访问天极网,如果您觉得该文章涉及版权问题,请看这里!