Запуск Word x64 в Delphi - PullRequest
Новая
       7

Запуск Word x64 в Delphi

3 голосов
/ 10 января 2012

В настоящее время я работаю над очень старым проектом, который основан на Delphi 5. Когда я пытаюсь открыть новый документ Word в системе x64, я получаю эту ошибку:

Error

Согласно 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;

1 Ответ

4 голосов
/ 10 января 2012

Проблема заключается в коде VBA, прикрепленном к документу, а не в коде Delphi. В частности, это скрытый модуль с именем API. Возможно, это в шаблоне или надстройке или автозапуске.

Скрытые модули защищены, что говорит о том, что вы не сможете изменить модуль. Вы можете попробовать связаться с автором защищенного модуля или, возможно, удалить все, что ввел этот модуль.

Возврат к 32-разрядной версии Office - более простое решение. Для этого потребуется сначала удалить 64-разрядную версию Office, поскольку эти две редакции не сосуществуют.

...