com组件使用时出错，很急，在线等待，100分！

我要在Delphi里使用用友软件的一个动态链接库“u8distribute”，实际为一COM组件，在Delphi里进行import activex libary 操作后，形成一个Tidistribute的控件，该控件有一个函数:
process(sxml:widestring):widestring .是把XML文件里的内容读到一个字符串中传递到用友数据库的，我在一个窗体上放入该控件，tidistribute,命名为idistribute1,我的代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
str:widestring;
ss:widestring;
ff:textfile;
begin
  AssignFile(Ff, 'c:\test.xml');
   reset(ff);
   ss:='';
   while not eof(ff) do
     begin
        Readln(Ff, Str);
        ss:=ss+str;
     end;
  str:=idistribute1.Process(ss)    ;  此行出错！！！！
end;
但在使用时出现一个错误“Activex 控件不能创建对象”根本不能进行传递，请大家帮忙指点一下到底是哪里的原因，很急很急啊。