控制word，做字符替换出现承载体接收到坏的数据

rt,执行到
  worddocument1.range.Find.Execute( findtext, matchcase, matchwholeword,
  matchwildcards, matchsoundslike, matchallwordforms, forward,
  wrap, format2, replacewith, replace，vFalse, vFalse,vFalse,vFalse,);
时出现上诉错误
引用单元为word2000改为word97或者改为Executeold都会出现oleaut32.dll地址错误
操作系统为2000server，开发工具delphi7和delphi6,ofiice为2000和xp奇怪的是有的机器没有问题，有的机器会出来上诉问题
同样的配置机器也会不同
有没有人遇到过如上为题，盼解答