在网上看到有Office2003的OCR调用代码,但我用时总是出错,提示没有注册,没有初始化  这两个错误
是不是我的Office2003没有安装虚拟打印机的缘故?
uses ComObj,MODI_TLB;procedure TForm1.Button1Click(Sender: TObject);
Var doc    :IDocument;
    Img    :IImage;
    Layout :ILayout;
begin
doc := IDispatch(CreateOleObject('MODI.Document')) as IDocument;
doc.create('c:\page0002.jpg');//---------->这里出错“没有注册...”
doc.OCR(miLANG_CHINESE_TRADITIONAL,true,true);
Img := IDispatch(doc.Images[0]) as IImage;
Layout := IDispatch(Img.Layout) as ILayout;
Memo1.Lines.Add(Layout.Text);
doc.Close(false);
Img := nil;
Layout := nil;
end;
其他的OCR控件有吗?推荐一个比较还用的,免费的