VPF::Ошибка работы с Word под Windows 7 - Форум программистов

mikhea

Дата 15.12.2011, 01:10 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 16.9.2007

Репутация: нет
Всего: нет

Доброго времени суток. Использую в программе взаимодейтвие с Word (через ComObj). Под XP все работает нормально, а под семеркой иногда (но не всегда) при запуске вылезает ошибка "Прекращена работа программы Microsoft Office Word" и подробности:
Сигнатура проблемы:
  Имя события проблемы:    APPCRASH
  Имя приложения:    WINWORD.EXE
  Версия приложения:    12.0.6545.5000
  Отметка времени приложения:    4c653e57
  Имя модуля с ошибкой:    ntdll.dll
  Версия модуля с ошибкой:    6.1.7600.16695
  Отметка времени модуля с ошибкой:    4cc7ab86
  Код исключения:    c0000005
  Смещение исключения:    00038db9
  Версия ОС:    6.1.7600.2.0.0.768.2
  Код языка:    1049

Дополнительные сведения об этой проблеме:
  LCID:    1049
  Brand:    Office12Crash
  skulcid:    1049

Из того, что удалось найти в интернете, понял, что такая или похожая ошибки встречаются у семерки часто, но что с ней делать, так и не понял.

Snowy

Дата 15.12.2011, 02:03 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 4
Всего: 484

Цитата(mikhea @ 15.12.2011, 02:10

)

Код исключения: c0000005

Обращение к несозданному объекту.
Где-то что-то не создалось.
Нужно пошагово пройтись отладчиком, либо ловить в try..except, либо попробовать залогить через madExcept
Обычно проблема с 7-кой в нарушении прав доступа.

mikhea

Дата 15.12.2011, 18:10 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 16.9.2007

Репутация: нет
Всего: нет

К чему может быть нарушение прав доступа, к Word? А почему тогда ошибка появляется только иногда? Отловить сложно, т.к. у самого стоит только XP, своими глазами ошибку не видел, все со слов заказчика. Под семеркой немного была возможность программу погонять, но у меня эта ошибка не вылезала ни разу, да и у заказчика она далеко не всегда появляется

Это сообщение отредактировал(а) mikhea - 15.12.2011, 18:11

mikhea

Дата 17.2.2012, 22:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 8
Регистрация: 16.9.2007

Репутация: нет
Всего: нет

Проблема была решена путем отключения надстроек COM в Word.

Теперь еще возникла такая ситуация. Прога успешно работает у нескольких пользователей (как под XP, так и под 7), но у одного под семеркой почему-то не работает открытие Word. Вот код:

Код


procedure OpenWord (path: string; var W: OLEVariant; var fOpenWord: boolean);
begin
  fOpenWord := true;

  if (FileExists(path) = false) then
  begin
    Application.MessageBox (PChar('Не удалось найти файл ' + path),
     PChar(Application.Title), mb_OK or MB_ICONERROR);
    W.Quit;
    W := Unassigned;
    fOpenWord := false;
    exit;
  end;

  try                                
    W.Documents.Open(path, ReadOnly := true);
  except
    Application.MessageBox (PChar('Не удалось найти файл ' + path),
     PChar(Application.Title), mb_OK or MB_ICONERROR);
    W.Quit;
    W := Unassigned;
    fOpenWord := false;
  end;
end;

FileExists(path) возвращает true, т.е. файл на месте, а вот W.Documents.Open(path, ReadOnly := true) дает исключение. Если убрать мою обработку исключений и оставить стандартную, то пишет, что не найден файл. Т.е. получается какая-то фигня, что FileExists файл видит, а Open - нет. Есть какие-нибудь предположения?

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »