Delphi&Word

← →
Chistyakov Victor (2002-03-28 10:42) [0]

Есть открытый документ Ворда. Знаю номер таблицы.
Необходимо выделить эту таблицу и изменить обрамление.
Хелп. :)

← →
Alx2 © (2002-03-28 11:17) [1]

По поводу обрамления и прочего:
Записываем в Wordе макрос, делаем все, что надо, смотрим текст макроса и, так сказать, по мотивам, переносим несколько видоизмененный код в Delphi.

← →
Chistyakov Victor (2002-03-28 11:47) [2]

Это все понятно.
Только Ворд генерит такой макрос
Selection.Tables(1).Select
Selection.Borders(wdBorderTop).LineStyle = wdLineStyleNone
и.т.д.

Пробовал писать
Var
WordObj : Variant
begin
....................
WordObj.Selection.Tables[1].Select
и
WordObj.Selection.Tables(1).Select
Как такие конструкции записать в Делфе?

WordObj := CreateOleObject(Что написано здесь?)
word.basic иили word.application?
Для второго варианта посмотри в файле "?:\...\Ocx\Servers\word97.pas" (или где-то рядом) По-моему, там после Tables долже Item идти (Selection.Tables.Item(1).Select). Правда, сам не разбирался...

Delphi&Word Найти похожие ветки