为什么不能打开扫描控件?

Question

我已经在系统中注册了控件IMGSCAN.OCX(就是kodak带的扫描控件)
然后我做了一个按钮，代码如下:
procedure TForm1.Button1Click(Sender: TObject);
var obj:variant;
begin
   obj := CreateOleObject('Imaging.ScanCtrl.1');
   obj.AboutBox();
end;然后执行，结果发生错误:"Project Project1.exe raised exception class EOleSysError with message '灾难性故障'.Process stopped.use Step or Run to continue."请问为什么出这个错啊，对扫描控件还有做额外的处理吗?另外我把该扫描控件插入到网页里面去执行也会出错!

Answer 1

把
var obj:variant;
换为：
var obj:OLEVariant;另外，需要 uses comobj;-------------------------------------------------------
http://kmok.cn

Answer 2

uses comobj哪肯定已经加了，要不然编译也过不去啊另外，我把
var obj:variant;
换为：
var obj:OLEVariant;还是不行，报同样的错!