怎么在易语言中调用dll实现条形码本地离线识别

今天就跟大家聊聊有关怎么在易语言中调用dll实现条形码本地离线识别,可能很多人都不太了解,为了让大家更加了解,小编给大家总结了以下内容,希望大家根据这篇文章可以有所收获。

DLL命令表

需要提前下载用到命令对应的库

.版本 2
.DLL命令 OCR, 文本型, "AspriseVB.dll", "OCR"
  .参数 file, 文本型
  .参数 imageType, 整数型
.DLL命令 OCRBarCodes, 文本型, "VBWrapper.dll", "OCRBarCodes"
  .参数 file, 文本型
  .参数 imageType, 整数型
.DLL命令 OCRpart, 文本型, "VBWrapper.dll", "OCRpart"
  .参数 file, 文本型
  .参数 imageType, 整数型
  .参数 startX, 整数型
  .参数 startY, 整数型
  .参数 width, 整数型
  .参数 height, 整数型

条形码本地离线识别的代码

.版本 2
.程序集 窗口程序集1
.子程序 _识别按钮_被单击
.局部变量 文件名, 文本型
.局部变量 识别结果, 文本型
.局部变量 分割, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 二次分割, 文本型, , "0"
.如果 (通用对话框1.打开 ())
  文件名 = 通用对话框1.文件名
  识别结果 = OCR (文件名, -1)
  .如果 (取文本长度 (识别结果) > 3)
    .如果 (寻找文本 (识别结果, “[”, , 假) > -1)
      分割 = 分割文本 (识别结果, “[”, )
      .计次循环首 (取数组成员数 (分割) - 1, i)
        .如果 (寻找文本 (分割 [i + 1], “]”, , 假) > -1)
          二次分割 = 分割文本 (分割 [i + 1], “]”, )
          .如果 (二次分割 [1] ≠ “”)
            .如果 (取文本长度 (二次分割 [1]) > 8)
              信息框 (二次分割 [1], 0, )
            .否则
            .如果结束
          .否则
          .如果结束
        .否则
        .如果结束
      .计次循环尾 ()
    .否则
    .如果结束
  .否则
  .如果结束
.否则
.如果结束

看完上述内容,你们对怎么在易语言中调用dll实现条形码本地离线识别有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注行业资讯频道,感谢大家的支持。