Delphi OCR图像文字解析函数解析
function identity(libName: pchar; mRound, bone, maxNoise, limit, spn, spx0, spy0, spuw, spuh, sppw, rlL, rlH, ruW, imgH: Integer; var imgAry: TBArray): string;
var ary: TAAIArray; unitAry: TBArray; n, n1, x1, y1, x2, y2, unitW, unitH: Integer; rt: string;
begin
-
处理图像切割区域:根据提供的参数,首先判断切割区域的起始坐标和宽高,若符合条件,则使用
cutArea
函数处理图像区域,移除噪声。 -
噪声清理:调用
clearNoise
清除图像中的杂点。 -
单元格区域处理:根据 spn 参数处理每个单元格区域,进行单独的噪声去除操作。
-
图像分割:调用
splitArea
函数对图像进行分割,获取单元格区域的坐标数据。 -
区域识别:对于每个区域,根据计算得到的坐标进行图像单元识别,计算出最终的 unitIdentity,并通过 libName 调用相应的库进行识别处理。
最终返回解析结果 rt
。
注意:对于每个区域,计算出对应的宽度和高度,并设置好相关数组,进一步进行OCR处理。
210.52KB
文件大小:
评论区