orc文字识别工具源码支持截图/导入图片/链接识别

type ＝ 编码_URL编码 (编码_BASE64编码 (img), 真, 真)
star ＝ 取启动时间 ()
Meryoter ＝ 申请内存 (取字节集长度 (到字节集 (type)), )
写到内存 (type, Meryoter, )
state ＝ _.ocr (Meryoter, access_token, aipDevid, “image”)
json.解析 (state)
编辑框1.加入文本 (“识别结果:” ＋ #换行符)
.如果 (json.成员数 (“words_result”) ＞ 0)
.计次循环首 (json.成员数 (“words_result”), int)
编辑框1.加入文本 (json.取通用属性 (“words_result[” ＋ 到文本 (int － 1) ＋ “].words”) ＋ #换行符)
.计次循环尾 ()
end ＝ 取启动时间 ()
编辑框1.加入文本 (“共耗时: ” ＋ 到文本 (end － star) ＋ “ 毫秒” ＋ #换行符 ＋ #换行符)
.否则
编辑框1.加入文本 (“识别失败!!” ＋ #换行符 ＋ “共耗时: ” ＋ 到文本 (end － star) ＋ “ 毫秒” ＋ #换行符 ＋ #换行符)
.如果结束

.否则
type ＝ url.内容
star ＝ 取启动时间 ()
Meryoter ＝ 申请内存 (取字节集长度 (到字节集 (type)), )
写到内存 (type, Meryoter, )
state ＝ _.ocr (Meryoter, access_token, aipDevid, “image”)
json.解析 (state)
编辑框1.加入文本 (“识别结果:” ＋ #换行符)
.如果 (json.成员数 (“words_result”) ＞ 0)
.计次循环首 (json.成员数 (“words_result”), int)
编辑框1.加入文本 (json.取通用属性 (“words_result[” ＋ 到文本 (int － 1) ＋ “].words”) ＋ #换行符)
.计次循环尾 ()
end ＝ 取启动时间 ()
编辑框1.加入文本 (“共耗时: ” ＋ 到文本 (end － star) ＋ “ 毫秒” ＋ #换行符 ＋ #换行符)
.否则
编辑框1.加入文本 (“识别失败!!” ＋ #换行符 ＋ “共耗时: ” ＋ 到文本 (end － star) ＋ “ 毫秒” ＋ #换行符 ＋ #换行符)