选取一个值a做为起始值,选取一个值b做为终止值,然后按以下公式变形:
| 0 (X<=a)
f(X)= | 255/(b-a)*(X-a)
| 255(X>=b)
var I:Integer;
begin
for I:=0 to 255 do
begin
if I<=sbMin.Position then
BarData[I]:=0
else if I>=sbMax.Position then
BarData[I]:=255
else
BarData[I]:=Round(255/(sbMax.Position-sbMin.Position)*(I-sbMin.Position));
end;
DrawBar;
pbBarPaint(pbBar);
Button1Click(Button1);
end;
四、变为黑白图片
在使用第三个功能的时候,你会发现当b<=a时,图像上的颜色除了黑色就是白色。这样操作的好处是不能直接显示出来的。这只要到了比较高级的图像处理如边缘检测等,才有作用。本例可以拿第三种方法的公式再变形,因此不作详细阐述。
五、指数级亮度调整
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




