Delphi Word w.quit(false) зависает на несколько минут

[a.n.o.n.i.m]

w: OleVariant;

Создается объект W:=CreateOleObject('Word.Applicatio n');

Записываются в него данные, далее конвертируется результат в пдф

w.ActiveDocument.ExportAsFixedFormat('1.pdf',wdExportFormatPDF,true,                                               
                 wdExportOptimizeForPrint,wdExportAllDocument,1,1,wdExportDocumentContent,
                  true,true,wdExportCreateNoBookmarks,true,true,false);

Отрывается пдфка.

Дальше, идет пробела с закрытием winword.exe. Если использовать w.quit(false); то идет зависание на несколько минут. Если без параметра false, закрывается быстро, но вылазит диалоговое окно с сохранением, которое мне не нужно, и пока его не закроешь висит процесс winword.exe

DisplayAlerts не помогает.

Как закрыть файл по аналогии с w.quit(false); только чтоб не зависало?

[Аватар]

wdDoNotSaveChanges в quit или w.ActiveDocument.Close(wdDoNotSaveC hanges) перед quit не?

[a.n.o.n.i.m]

Сообщение от Аватар

wdDoNotSaveChanges в quit или w.ActiveDocument.Close(wdDoNotSaveC hanges) перед quit не?

Пробовал такие варианты
w.DisplayAlerts := false;
w.Visible:=false;

if VarIsEmpty(w) = false then
begin
w.Quit;
w := 0;
end;

w.ActiveDocument.Close(false) ;

w.quit(false,0);

w.quit(false);

w.ActiveDocument.Close(wdDoNotSaveC hanges);
w.quit(wdDoNotSaveChanges);

Все зависают на несколько минут. Только этот срабатывает

w.Quit;
без параметра, но вылазит диалоговое окно, которое не нужно и висит процесс. Уже не хз куда рыть, почему он не хочет его сразу закрыть и какие есть еще то варианты, и возможно ли это вообще?

[a.n.o.n.i.m]

С чем может быть связана проблема?