delphi - 在 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 的隐藏模块。也许这是在模板或加载项或自动启动中。

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

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