Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Не вставить поле в ячейку таблицы / 3 сообщений из 3, страница 1 из 1
27.04.2005, 15:07:31
    #33038498
BPK
BPK
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не вставить поле в ячейку таблицы
Управляю MSWord'ом из программы на Delphi 6.
В нижний колонтитул документа вставляю таблицу, а потом пытаюсь вставить поле в одну из её ячеек. Не получается. Word говорит, что: "Данная команда недоступна".
Кусок кода:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Ty:=wdFieldEmpty;
Txt:='PAGE  ';
PF:=True;
Doc.Activate;
Doc.ActiveWindow.ActivePane.View.Type_:=wdPrintView;
App.ActiveWindow.ActivePane.View.SeekView:=wdSeekCurrentPageFooter;
Tbl.Cell( 5 , 9 ).Select;
App.Selection.Fields.Add(App.Selection.Range, Ty, Txt, PF);

Doc это ActiveDocument, а App - приложение MSWord
Если не выделять ячейку: Tbl.Cell(5,9).Select; , то вставка работает.
...
Рейтинг: 0 / 0
27.04.2005, 15:09:33
    #33038500
BPK
BPK
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не вставить поле в ячейку таблицы
Да, и если не пытаться вставить поле, то ячейка выделяется.
Работа напрямую с Cell(x,y).Fields не удаётся
...
Рейтинг: 0 / 0
27.04.2005, 15:14:48
    #33038516
BPK
BPK
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не вставить поле в ячейку таблицы
Помогло:
Код: plaintext
1.
CD:=wdCollapseStart;
App.Selection.Collapse(CD);

Хм, как-то по-уродски получается. Неужели нельзя напрямую указать ячейку, без Selection?
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Не вставить поле в ячейку таблицы / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]