Как открыть документ Word в Delphi

@d1gll · Регистрация: 20.04.2014

Author24 — интернет-сервис помощи студентам

Объясните пожалуйста, по пальцем, как открыть уже готовый документ word в delphi! Я лазил по форумам но так и не понял куда что нужно писать!

Скандербег · 20.04.2014, 10:18

Вариант 1 для работы с документом из программы на Дельфи.

Delphi

uses ComObj //не забыть включить этот модуль в uses
...
procedure TMainForm.Button1Click(Sender: TObject);
var
  W : Variant;
begin
  W:= CreateOleObject('Word.Application');
  W.Documents.Open(<путь и имя файла документа в одинарных кавычках>);
  W.Visible := True;
  W := Unassigned;
end;

Вариант 2 только чтобы открыть документ.

Delphi

uses ShellAPI; //здесь нужен другой модуль
  ...
procedure TMainForm.Button1Click(Sender: TObject);
begin
  ShellExecute(Application.Handle, nil, PChar(<путь и имя файла документа в одинарных кавычках>),
               nil, nil, SW_SHOWNORMAL);
end;

@d1gll · 20.04.2014, 13:34 **[ТС]**

Спасибо!))

Добавлено через 5 минут
А вот ты скинул вариант первый. Как я могу заменить не которые строчки в word. Приведи пожалуйста пример, если не сложно!)

Скандербег · 20.04.2014, 14:44

Как я могу заменить не которые строчки в word

(знак вопроса)
Интернет творит чудеса.
Достаточно в поисковой строке ввести: "работа с ms word из delphi" как получим не многим менее 200 тыс ссылок.
Потому как работа из Дельфи с вордом обсосана до молекул.

@d1gll · 20.04.2014, 16:31 **[ТС]**

Что то до меня не доходят, что они там пишут.
Вот например сначала нужно выделить тот текст который нужно изменить с помощью range.

Delphi

1
2
3

a:=5;
b:=15;
range2:=WordDocument1.Range(a,b);

То есть он должен выделить с 5 по 15 символ и заменить его.А как мне сделать что он определенное слово заменял, подскажите плиз?!

@d1gll 0 / 0 / 0 Регистрация: 20.04.2014 Сообщений: 6
		1
	Как открыть документ Word в Delphi 20.04.2014, 09:53. Показов 19501. Ответов 4 Метки нет (Все метки) Объясните пожалуйста, по пальцем, как открыть уже готовый документ word в delphi! Я лазил по форумам но так и не понял куда что нужно писать! 0

@d1gll 0 / 0 / 0 Регистрация: 20.04.2014 Сообщений: 6
	20.04.2014, 13:34 [ТС]	3
	Спасибо!)) Добавлено через 5 минут А вот ты скинул вариант первый. Как я могу заменить не которые строчки в word. Приведи пожалуйста пример, если не сложно!) 0

Скандербег 1074 / 987 / 340 Регистрация: 07.08.2012 Сообщений: 2,790
	20.04.2014, 14:44	4
	Как я могу заменить не которые строчки в word (знак вопроса) Интернет творит чудеса. Достаточно в поисковой строке ввести: "работа с ms word из delphi" как получим не многим менее 200 тыс ссылок. Потому как работа из Дельфи с вордом обсосана до молекул. 0

	20.04.2014, 16:31

Опции темы

Как открыть документ Word в Delphi

Решение