在 Delphi 中启动 Word x64

Question

我目前正在处理基于 Delphi 5 的非常旧的项目。当我尝试在 x64 系统上打开新的 Word 文档时，我收到此错误：

根据MSDN，问题的根源可能是我的Office（x64）版本。在应用程序中，我们使用 TWordApplication 对象来管理 Word 调用。有没有解决这个问题的方法？在 Office x86 上一切正常。

这是代码的一部分：

Word := TWordApplication.Create(nil);
Word.ConnectKind := ckNewInstance;
Word.AutoQuit := True;
Word.Connect;
Word.Options.CheckSpellingAsYouType := False;
Word.Options.CheckGrammarAsYouType := False;
Word.Options.SuggestSpellingCorrections := False;
Word.Options.CheckGrammarWithSpelling := False;
Word.Options.ShowReadabilityStatistics := False;
Word.Options.IgnoreInternetAndFileAddresses := False;
Word.Options.IgnoreUppercase   := True;
Word.Options.IgnoreMixedDigits := True;
Word.Options.ReplaceSelection  := True;

Answer 1

问题似乎出在附加到您的文档的 VBA 代码上，而不是 Delphi 代码上。具体来说，涉及一个名为 API 的隐藏模块。也许这是在模板、加载项或自动启动中。

隐藏的模块受到保护，这表明您可能无法修改该模块。您可以尝试联系受保护模块的作者，或者删除任何引入此模块的内容。

恢复到 32 位 Office 是一种更简单的解决方案。这将要求您先卸载 64 位 Office，因为这两个版本不共存。