百度OCR API调用例子

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 返回文本, 文本型
.程序集变量 正则, 正则表达式类

.子程序 _按钮1_被单击
.局部变量 uri, 文本型
.局部变量 APIKey, 文本型
.局部变量 SecretKey, 文本型
.局部变量 Token, 文本型
.局部变量 js, 类_json
.局部变量 access_token, 文本型
.局部变量 uri2, 文本型
.局部变量 要是别的图片, 文本型
.局部变量 BASE64, 文本型
.局部变量 i, 整数型

编辑框3.内容 ＝ “”
APIKey ＝ 编辑框1.内容
SecretKey ＝ 编辑框2.内容
BASE64 ＝ 编码_BASE64编码 (图片框1.图片)
uri ＝ “https://aip.baidubce.com/oauth/2.0/token?client_id=” ＋ APIKey ＋ “&client_secret=” ＋ SecretKey ＋ “&grant_type=client_credentials”
' “https://aip.baidubce.com/oauth/2.0/token?client_id=” ＋ APIKey ＋ “&client_secret=” ＋ SecretKey ＋ “&grant_type=client_credentials”
Token ＝ 编码_URL解码 (到文本 (网页_访问_对象 (uri, 1, , , , “Content-Type:application/x-www-form-urlencoded”, , , , , , , , , , , , , )), 真)
js.解析 (Token, 真, )
access_token ＝ js.取通用属性 (“access_token”, )
调试输出 (access_token)
要是别的图片 ＝ “image=” ＋ 编码_URL编码 (BASE64, 真, 真)
uri2 ＝ “https://aip.baidubce.com/rest/2.0/ocr/v1/general_basic?access_token=” ＋ access_token
返回文本 ＝ 编码_URL解码 (到文本 (网页_访问_对象 (“https://aip.baidubce.com/rest/2.0/ocr/v1/general_basic?access_token=” ＋ access_token, 1, 要是别的图片, , , “Content-Type:application/x-www-form-urlencoded”, , , , , , , , , , , , , )), 真)
正则.创建 (“{#引号words#引号:#引号(.*?)#引号}”, 返回文本, 假, 真, 真, 真)
.计次循环首 (15, i)
    编辑框3.加入文本 (正则.取子匹配文本 (i, 1, ) ＋ #换行符)
.计次循环尾 ()

.子程序 _按钮2_被单击

通用对话框1.打开 ()
图片框1.图片 ＝ 读入文件 (通用对话框1.文件名)

@hxnr