手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>delphi>列表

图像的处理(一)----灰度图像像素颜色亮度处理

来源:互联网 作者:西部数码 时间:2008-04-11
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!

DrawBar;

pbBarPaint(pbBar);

end;

二、缩小颜色范围以增强或减弱亮度

颜色本来是从0~255的。如果调节它的范围,例如从0~16,则会是图像明显变暗。我们可以把起始值设为a,把终止值设为b,则新的颜色值New=a (b-1)*Old/255。这样做的话可以改变亮度,并且不会破坏原先颜色的顺序。代码如下

var I:Integer;

begin

for I:=0 to 255 do

BarData[I]:=(255-sbMin.Position) Round((sbMin.Position-sbMax.Position)/255*I);

DrawBar;

pbBarPaint(pbBar);

Button1Click(Button1);

end;

这里的sbMin.PositionsbMaxPosition都是反转过的。所以使用时要用255去减

三、增加某个范围内的颜色范围

如果图像本身的颜色范围很小的画,你可以通过这种方法来加大图像的对比度,有利于对图像的分析。具体做法:

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!