手把手教你TestComplete_图文转换OCR示例一

 

 

图文转换在自动化测试的时候重要吗？得看你运气如何了。如果你人品好得爆棚，啥对象都能识别出来，估计很难用上。不过常在河边走，哪能不湿鞋捏，总有你识别不出来的对象吧，这个时候，使用图文转换或许就能用上了。

咱先看看最后的效果，再说怎么个做法吧。

先下载脚本：http://download.csdn.net/source/3515680

 

内含：<手把手教你TestComplete_图文转换OCR示例一.txt>

打开文本，拷贝脚本，然后打开notepad，在里面随便输入几个字符，先限定英文和数字吧，例如：

 

 

然后运行脚本，看看最后的日志：

 

 

 

识别出来了吧

再试试加两个汉字进去，运行了看看效果：

 

 

 

唉，人生不如意十之八九呀，就知道TC的OCR不是那么牛叉，识别不了汉字，我也没有查出方法来。期待一位英才的出现，帮忙搞定这个问题吧。要不这个OCR就太局限了。


好了，效果看过了，来看看下面的步骤：

第一步：

找到要识别的对象(控件)，得到其图片，既然是OCR，肯定是得有图片，才能识别成文本塞

  Set p = Sys.Process("notepad")
  Set w = p.Window("Notepad", "*").Window("Edit")
  Set Rect = w.Picture(0, 0,w.Width,w.Height )
  

第二步：

这步最麻烦，根据之前的图片建立OCR对象，要识别是啥字，自然需要知道字体字号这些属性才好搞，设置好先


  Set OCRObj = OCR.CreateObject(Rect)
  Set OCROptions = OCRObj.CreateOptions

  Set Font = OCROptions.Fonts.Add
  Font.Name = w.Window("ComboBox", "", 1).wText
  Call Font.Sizes.Add(12)



第三步：这步其实最简单，就调用一下OCR的对象，调用GetText识别不就好了

  Call Log.Message(OCRObj.GetText(OCROptions), "", pmNormal, Null, Rect)


其实这个是TestComplete提供的例子，我只不过是把例子从英文版本的改为了中文版本。