CreateOleObject( Word.Application )

← →
ИМХО © (2004-02-18 15:03) [0]

Вопрос про OLE-автоматизацию Ворда. Как можно (после создания объекта) загрузить в него html-файл?

← →
Тимохов © (2004-02-18 15:31) [1]

НАчни запись макроса. Открой нужный файл. Останови макрос. Посмотри макрос. Там все будет - только что проверил.

← →
ИМХО © (2004-02-18 15:36) [2]

Кинь примерчик, плиз.

← →
Тимохов © (2004-02-18 15:37) [3]

> Тимохов © (18.02.04 15:31) [1]

Ворд уже закрыл - второй раз описанное в 1 делать не буду.
Сделай сам - занимает ровно 40 секунд.

← →
olookin © (2004-02-18 15:42) [4]

Хотел дать пример но не буду... Потому как солидарен с

"Тимохов © (18.02.04 15:37) [3]

> Тимохов © (18.02.04 15:31) [1]

Ворд уже закрыл - второй раз описанное в 1 делать не буду.
Сделай сам - занимает ровно 40 секунд."

Надо и самому чего то делать.

← →
ИМХО © (2004-02-18 15:44) [5]

А причем здесь "Ворд уже закрыл"? Нужно программно загрузить HTML-файл в объект, созданный при помощи CreateOleObject("Word.Application").

← →
ИМХО © (2004-02-18 15:47) [6]

Боже, сколько пафосу. Вы там не лопнули еще на пару, г-да Тимохов и olookin?

← →
Тимохов © (2004-02-18 15:49) [7]

> ИМХО © (18.02.04 15:44) [5]

А-а-а-а. Ты просто фишку не просек. Понял.
Значит так. Общий метод изучения ворда и екселя (уверяю тебя, так начинали все) заключается в том, чтобы открыть ворд, запустить запись макроса, сделать нужное действие, остановить запись, посмотреть на созданный макросом код визуал бэйсика, скопировать этот код в дельфи, отредактировать и запустить. Все.
Что не понятно спрашивай.

← →
Тимохов © (2004-02-18 15:51) [8]

> ИМХО © (18.02.04 15:47) [6]

Уважаемый - это не хорошо.
Пафос здесь ни причем. См. начало 7 (про фишку). Думаю 7 вам поможет. Т.к. это почти единственный способ изучения ворда и екселя в целях работы через оле.

Еще раз скажу, что не понятно, спрашивайте, отвечу - на 6 я не обиделся.

← →
Amoeba © (2004-02-18 15:51) [9]

> ИМХО © (18.02.04 15:47) [6]

Вместо того, чтобы огрызаться, лучше бы использовал потраченное на очередные посты время на то, чтобы последовать данному тебе совету. Кстати, и пользы больше было бы.

← →
ИМХО © (2004-02-18 16:02) [10]

Sub Макрос1() Documents.Open FileName:="faq.htm", ConfirmConversions:=False, ReadOnly:= _ False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _ "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _ Format:=wdOpenFormatAuto End Sub

Тимохову спасибо.

Спасибо.

Вот еще два вопроса:
1. Загрузка происходит подозрительно долго. Полагаю, это из-за Format:=wdOpenFormatAuto. Нет ли параметра, чтобы ускорить процесс?

2. При загрузке локального html-файла программа захотела выйти в Интернет. Как отрегулировать это?

> 2. При загрузке локального html-файла программа захотела
> выйти в Интернет. Как отрегулировать это?

Может в файле есть обращение в интернет?

На такие вопросы уже макросами не ответишь. Нужно копать документацию об объектной модели ворда, которая есть в том же вижуал бейсике, откуда ты брал текст макроса.
Документацию советую прочесть в любом случае.

На эти вопросы, думаю, тебе может ответить тот, кто много занимался с выводом в ворд (это не я). Я лишь хорошо знаю методику выяснения некоторых вопросов (что я и продемонстрировал ранее).

По первому пункту: поставил wdOpenFormatWebPages - результат, по-моему, тот же.

По второму:
Самое интересное, что если открыть в офф-лайне тот html-файл в ослике, то выход в Инет не запрашивается. А если через:
WD.Documents.Open(LoadName, False, False, False, "", "", False, "", "",
wdOpenFormatWebPages);

то просит выхода :(
Парадокс?

Классика.
procedure TForm1.Button1Click(Sender: TObject); var MSWord: Variant; begin try MsWord := CreateOleObject("Word.Basic"); except ShowMessage("Could not start Microsoft Word."); Exit; end; MsWord.AppShow; MsWord.FileOpen("C:\f.htm"); end;

CreateOleObject( Word.Application ) Найти похожие ветки