На этом шаге мы рассмотрим закрытие документа и приложения.
Если приложение обрабатывало несколько документов, и все они уже сохранены, то эти документы можно закрыть одновременно с помощью метода Close коллекции Documents. Добавим в форму приложения кнопку и напишем программный текст, который закроет все открытые документы.
procedure TForm1.Button7Click (Sender: TObject); //Закрытие всех открытых документов begin W.Application.Documents.Close; end;
Если требуется выборочно закрывать документы коллекции, используйте метод Close объекта-документа. Например, чтобы закрыть активный документ, используйте оператор:
W.ActiveDocument.Close;
Особенность метода Close - возможность задать режим сохранения документа во время его закрытия. Оператор
W.ActiveDocument.Close(True);
Документы закрыты, можно закрыть приложение Word и очистить память от объекта Application. Используем метод Quit объекта Application и оператор W:=UnAssigned;. Реализуем это в виде процедуры-обработчика нажатия кнопки.
procedure TForm1.Button8Click (Sender:TObject); //Закрытие приложения Word begin W.Quit; W:=UnAssigned; end;
На следующем шаге мы рассмотрим обработку ошибок, возникающих при работе с объектом TApplication.