Информация

Школа программирования Delphi

Портал DelphiSchool является бесплатным проектом, обеспечивающим пользователям быстрый и легкий доступ к урокам программирования на Delphi. Сайт позволяет научиться программировать на Делфи любому, кто хочеть писать свои программы, игры, Android приложения, программы для MAC OC или IOS. Кроме уроков Delphi и статей Delphi, на сайте доступны также и видеоуроки. Практически к каждому уроку, пользователю доступен исходник, изучив который, он сможет наглядно посмотреть как работает та или иная программа, написанная на Делфи. Кроме того мы постараемся прилагать к каждому материалу (статье, уроку, видеоуроку) файлы Delphi, которые будут помогать изучить предоставленный материал.

Каждый кто решил написать свою программу, создать свое приложение, научиться программировать и т.д., найдет на DelphiSchool статьи Delphi, уроки Delphi, видеоуроки Delphi, исходники Delphi, файлы Delphi, изучит компоненты Delphi, посмотрит Delphi примеры и многое другое абсолютно бесплатно. Все о Delphi программировании теперь собрано на одном сайте!!!

DelphiSchool

Полезное
Книга
Форма входа
Поиск по сайту
Статистика сайта


Онлайн всего: 1
Гостей: 1
Пользователей: 0
Новости
Рекламный блок
Главная » Уроки Delphi » Delphi и MSOffice » Delphi и Microsoft Word

Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi

Вы искали Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi и специально для вас мы подготовили этот урок Delphi. К каждому уроку мы стараемся предоставлять исходники Delphi, поэтому в конце статьи Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi вы можете посмотреть пример Delphi, или код Delphi, что позволит изучить Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi более детально.
Изучайте программирование онлайн на сайте www.DelphiSchool.3dn.ru и освойте основы программирования. Обучение программированию на DelphiSchool это программирование для начинающих и опытных программистов.
Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi Функция, реализующая механизм доступа к OLE-объекту, находится в библиотеке ComObj.pas. Эта функция – CreateOleObject. Ее единственным аргументом является строка-идентификатор, а возвращает она ссылку на объект.
Доступ к приложению Word осуществляется, как правило, посредством основных двух объектов, Word.Application и Word.Document. Они же обеспечивают доступ и к другим объектам Word (текст, таблицы, кнопки, меню и т.д.). Наиболее легкий метод работы с COM-сервером Word базируется на использовании переменных типа Variant.
Давайте на примере рассмотрим создание документа Word помощью Delphi.
Для начала создадим новый проект (File | New | VCL Foms Application-Delphi) и поместим на него 4 кнопки (TButton). Поменяем заголовки (свойство Caption) этих кнопок на: "Создать документ Word", "Открыть документ Word", "Сохранить документ Word", "Закрыть документ Word". Как понятно из названий, мы будем открывать, создавать, сохранять и закрывать документ Word при нажатии на эти кнопки.
Чтобы начать работать с Word необходимо в модуле формы указать ссылку на использование библиотеки ComObj, поэтому в разделе uses мы дописываем ComObj. Также нам необходимо объявить переменную типа Variant. Давайте создадим обработчик события OnClick для кнопки "Создать документ Word" и напишем код:
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');
end;

Если сейчас запустить нашу программу и нажать на кнопку "Создать документ Word", то приложение Word будет запущено, но его окно не будет отображено на экране монитора. В память компьютера будет загружен объект Application, который обеспечивает доступ ко всем внутренним объектам, коллекциям и свойствам. Сейчас нас интересует свойство Visible этого объекта. Если значение этого свойства установить в True, то окно приложения Word станет видимым. Поэтому давайте допишем еще одну строчку в наш код:
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');// запуск приложения Word
w.Visible:=true; // делаем Word видимым
end;

Вот теперь если запустить программу и нажать на кнопку "Создать документ Word", то наше приложение Word станет видимым и отобразится на экране монитора.
Для того чтобы создать новый документ, необходимо использовать метод Add, коллекции Documents. Поэтому если мы хотим создать новый документ Word с помощью Delphi, необходимо написать:
Код
procedure TForm1.Button1Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');// запуск приложения Word
w.Documents.Add; // создание нового документа
w.Visible:=true; // делаем Word видимым
end;

В этом коде, после выполнения метода Add, будет создан новый документ, который отобразится в окне приложения Word. Обратите внимание, что видимым наш документ (w.Visible:=true) я делаю в самую последнюю очередь. При формировании отчетов, рекомендуется так делать. Это сокращает время создания отчетов и повышает производительность работы приложений.
С созданием документа Word в Delphi разобрались. Теперь перейдем к открытию документа Word. Для этого создаем обработчик события OnClick для кнопки "Открыть документ Word" и напишем следующее:
Код
procedure TForm1.Button2Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');// запуск приложения Word
w.Documents.Open(ExtractFilePath(paramstr(0))+'/Delphi and MS Word.doc'); //открываем документ Word находящийся в папке с программой
w.Visible:=true; // делаем Word видимым
end;

Синтаксис метода Open глядит следующим образом:
Код
Documents.Open(FileName, ConfirmConversions, ReadOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate, Revert, WritePasswordDocument, WritePasswordTemplate, Format)

Давайте рассмотрим аргументы метода Open, их типы и функциональное значение:
FileName: string — путь и имя файла;
ConfirmConversions: boolean — False — не открывать диалоговое окно «Преобразование файла» при открытии файла, формат которого не соответствует формату Word (doc или docx)
ReadOnly:boolean — True — открыть документ в режиме «Только для чтения»
AddToRecentFiles: boolean — True, чтобы добавить документ в список недавно открытых документов.
PasswordDocument: string — пароль для открытия документа
PasswordTemplate: string — пароль для открытия шаблона
Revert : boolean — True, чтобы вернуться к сохраненному документу, если этот документ открывается повторно.
WritePasswordDocument: string — пароль для сохранения измененного документа в файле
WritePasswordTemplate:string — пароль для сохранения изменений в шаблоне
Format:integer — формат открываемого документа.

Обязательным параметром метода Open является только FileName, остальные параметры могут отсутствовать, как отсутствуют в вышеприведенном примере кода. Но если вдруг нам понадобится воспользоваться некоторыми из этих параметров, то их необходимо явно указать при вызове метода. Например, если мы решим открыть файл в режиме "Только для чтения", то код будет выглядеть следующим образом:
Код
procedure TForm1.Button2Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');// запуск приложения Word
w.Documents.Open(ExtractFilePath(paramstr(0))+'/DelphiSchool.doc', ReadOnly:=true); // открываем документ Word находящийся в папке с программой в режиме "Только для чтения"
w.Visible:=true; // делаем Word видимым
end;

С открытием документа Word тоже разобрались. Переходим к сохранению документа. Для кнопки "Сохранить документ Word" создаем обработчик события OnClick и пишем:
Код
procedure TForm1.Button3Click(Sender: TObject);
begin
w:=CreateOleObject('Word.Application');// запуск приложения Word
//открываем документ Word находящийся в папке с программой в режиме "Только для чтения"
w.Documents.Open(ExtractFilePath(paramstr(0))+'/DelphiSchool.doc', ReadOnly:=true);
// сохраняем документ в папку с программой под именем DelphiSchool Copy.doc
w.ActiveDocument.SaveAs(ExtractFileDir(paramstr(0))+'/DelphiSchool Copy.doc');
w.Visible:=true; // делаем Word видимым
end;

Аргументы метода SaveAs, их типы и функциональное назначение представлены ниже:
FileName: String - Путь и имя файла
FileFormat - Число Формат файла
LockComments: Boolean - True - не сохранять комментарии
Password: String - Пароль, который будет использоваться при открытии документа
AddToRecentFiles: Boolean - True - добавить имя файла в список меню File
WritePassword: String - Пароль, который будет использоваться для сохранения документа
ReadOnlyRecommended: Boolean - True - в последующем документ можно открыть "только для чтения"
EmbedTrueTypeFonts: Boolean - True - при сохранении перевести шрифты документа в TrueType
SaveNativePictureFormat: Boolean - Используется для импорта графики из форматов, не поддерживаемых Windows. True - импортировать только графику, поддерживаемую Windows
SaveFormsData: Boolean - True - сохранить форму документа без текста
SaveAsAOCELetter: Boolean - Используется в версиях Word для компьютеров Apple Macintosh

При вызове метода SaveAs, как и при Open, можно задавать как один, так и несколько аргументов. Но, как правило, достаточно только первого аргумента (путь и имя файла).
Ну и последнее что мы рассмотрим – это закрытие документа. Закрыть документы можно с помощью метода Close коллекции Documents. Создадим обработчик события OnClick для кнопки "Закрыть документ Word" и напишем код:
Код
procedure TForm1.Button4Click(Sender: TObject);
begin
w.ActiveDocument.Close(True); // сохраняем и закрываем Word
end;

После того как документ закрыт, можно закрывать и приложение Word:
Код
procedure TForm1.Button4Click(Sender: TObject);
begin
w.ActiveDocument.Close(True); // сохраняем и закрываем Word
w.Quit;
end;

К уроку (статье) Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi прилагается исходник, посмотрев который, вы можете ознакомиться с полным исходным кодом программы и посмотреть как работает созданная программа. Исходный код сопровождается комментариями, благодаря чему вы сможете легко в нем разобраться. Но я настоятельно рекомендую делать все самостоятельно. Так вы лучше и быстрее усвоите то, о чем говорилось в этом уроке

Для того чтобы получить возможность скачать исходник Delphi к этому уроку, необходимо посетить сайт рекламодателя. После этого, появится ссылка на исходник Delphi к уроку Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi
Нажмите на эту ссылку Ссылка

Категория: Delphi и Microsoft Word | Добавлено: 11.05.2014 | Просмотров: 13730 | Комментарии: 14 | Рейтинг: 0.0/0

Добавить Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi в закладки:



Не забывайте писать свои отзывы об уроке Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi. Ваша информация об уроке Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi может помочь другим людям изучить программирование на Delphi. Также не забывайте проставлять рейтинг урока, ведь от этого зависит его попадание в список лучших уроков Delphi
Всего комментариев: 1
0
1 roamer   (21.10.2022 11:33) [Материал]
некторый полезный функционал (исходники) приведен здесь:

https://roamer55[в вашем тесте присутствует ссылка на сторонний ресурс, или ненормативная лексика]/main_programming/delphi/delphi_10_2_vcl/d10_funcs_ole/d10_funcs_ole_word/

может для кого-то окажется полезным...

dth="100%" cellspacing="1" cellpadding="2" class="commTable">
Имя *:
Email:
Код *: