![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
图像处理和识别
文章平均质量分 69
xtalk2008
无
展开
-
图像干扰处理1
图像识别是一个复杂的过程,分别要经过图像处理、图像分割、图像校正、图像识别等过程其中第一步就是去掉干扰以下是itpub.net中的图灵 经过处理后的样子 代码如下procedure TForm1.BitBtn1Click(Sender: TObject);var Bmp: TBitmap; Color: TColor; x, y: Integer;beg原创 2007-10-29 21:32:00 · 1276 阅读 · 0 评论 -
图象灰度算法
以下是em-hits网站的图灵通过灰度算法后的结果如下可以看到,图象的干扰已经被去掉了,代码如下procedure TForm1.BitBtn1Click(Sender: TObject);var Bmp: TBitmap;begin Bmp := TBitmap.Create; Bmp.Assign(Image1.Picture.Bitmap); Bmp := BTGray(Bmp);原创 2007-11-01 14:15:00 · 655 阅读 · 0 评论 -
图像二值化算法
还是以上一个图片为例,经过图像二值化算法以后,图像只有黑白两色,这样才能为图像识别做准备处理前图像处理后图像代码如下function BTTwoValue(Bmp: TBitmap; TV: Integer): TBitmap;var x, y: Integer;begin Bmp.PixelFormat := pf24bit; Result := TBitmap.Create; Result原创 2007-11-01 14:20:00 · 898 阅读 · 0 评论 -
图像分割算法
图像经过处理后,还需要进行分割,才能进行比较或识别,下面就是图像分割的算法原始图分割后的图形12345678 图像分割代码如下 TImageInfo = record Bmp: TBitmap; Rect: TRect; end; pImageInfo = ^TImageInfo;function BTSegment(Bmp: TBitmap; CType, MaxValue,原创 2007-11-01 14:54:00 · 1835 阅读 · 0 评论 -
图像滤波算法
有的时候,仅靠灰度算法和二值化算法还是不能达到效果,这个时候就要借助图像滤波算法了原始图(www.wolfsurfer.com)经过灰度算法和二值化算法经过滤波算法可以看到,干扰被过滤掉了,只有进行下一步(图像分割)图像滤波算法代码如下function BTFilter(Bmp: TBitmap): TBitmap; procedure SelectionSort(var a: array of原创 2007-11-01 14:45:00 · 1447 阅读 · 1 评论