百度智能云提供了OCR识别功能,其识别种类非常丰富,包括:卡证文字识别、通用场景文字识别、交通场景文字识别、财务票据文字识别...等等。无论是移动端,还是PC端,通过调用OCR服务,可以方便的识别成需要的文字。
在百度智能云官方提供的调用文档中,并没有提供delphi的调用示例,本文提供delphi调用百度智能云OCR的例子。要想调用百度智能云OCR,首先需要在 百度智能云-智能时代基础设施 网址中申请好账号(注意:有些OCR识别需要申请权限),这个不在本文中讨论。
根据百度智能云提供的文档,我们开发了Delphi调用的控件,并编写了使用该控件的Demo示例。
在该控件及Demo中,提供如下功能及知识点:
- Delphi 调用百度OCR API,一个函数完成百度智能云中所有OCR识别;
- 原生TNetHTTPClient的使用方法;
- 图像剧中按比例放置;
- JSON的两种格式化方法函数。
OCR中的核心函数:
function TOCR_Baidu_Component.WebPost(URL, Body: string;
var ResponseStr: string): Boolean;
var
NetHTTPClient: TNetHTTPClient;
AResponseContent: TMemoryStream;
ARequestContent: TMemoryStream;
HTTPResponse: IHTTPResponse;
B: TBytes;
begin
// 首先检查URL是否正确,就简单的判断是否为空即可
if Trim(URL) = '' then
begin
ResponseStr := 'URL 参数不能为空!';
Exit(False);
end;
// 准备请求数据
ARequestContent := nil;
if Body <> '' then
begin
ARequestContent := TMemoryStream.Create;
B := Tencoding.UTF8.GetBytes(Body);
ARequestContent.Write(B[0], Length(B)); // 写入数据
ARequestContent.Position := 0; // 这一句不能少,否则发送的参数为空
end;
NetHTTPClient := TNetHTTPClient.Create(nil);
NetHTTPClient.Asynchronous := False; // 表示同步请求
NetHTTPClient.ContentType := 'application/x-www-form-urlencoded';
NetHTTPClient.ConnectionTimeout := 3 * 1000; // 连接超时10秒钟
AResponseContent := TMemoryStream.Create;
try
try
HTTPResponse := NetHTTPClient.Post(URL, ARequestContent,
AResponseContent);
except
on E: Exception do
begin
ResponseStr := E.Message;
Exit(False);
end;
end;
// 如果返回状态不正确,则返回错误信息
if HTTPResponse.StatusCode <> 200 then
begin
ResponseStr := HTTPResponse.StatusText;
Exit(False);
end;
// 正确返回字符串
SetLength(B, AResponseContent.Size);
AResponseContent.Read(B[0], AResponseContent.Size);
ResponseStr := Tencoding.UTF8.GetString(B);
Result := True;
finally
NetHTTPClient.Free;
AResponseContent.Free;
if ARequestContent <> nil then
ARequestContent.Free;
end;
end;
帮助文档下载:TBaidu_OCR_Component.chm文章来源:https://www.toymoban.com/news/detail-519659.html
具体源代码:付费源代码下载文章来源地址https://www.toymoban.com/news/detail-519659.html
到了这里,关于Delphi 百度智能云 OCR API 调用控件的文章就介绍完了。如果您还想了解更多内容,请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章,希望大家以后多多支持TOY模板网!