VPF::Вставка таблицы - Форум программистов

DYUMON

Дата 25.2.2007, 20:23 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 321
Регистрация: 17.6.2006
Где: Новосибирск

Репутация: нет
Всего: 3

В программе использую таблицу а прога выводит отчёт в ворд так надо в ворд вставить таблицу.
я делаю

Код


var 
 numstr: OleVariant;//peremennaa nomer str
 numf: OleVariant;
begin
numstr:= wdAlignPageNumberCenter;
numf:= wdHeaderFooterFirstPage;
wordapplication1.Selection.HeaderFooter.PageNumbers.Add(numstr,numf) ;
end

на васике это выглядит
Selection.Sections(1).Headers(1).PageNumbers.Add PageNumberAlignment:= _
wdAlignPageNumberCenter, FirstPage:=False
вроде пробовал всяко
либо на проверке выдаётся ошибка
либо потом приложение падает.

--------------------

Всех программистов надо посадить на целероны, что бы впредь головой думали что пишут.

Remember

Дата 25.2.2007, 21:32 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 63
Регистрация: 25.2.2007
Где: Самара

Репутация: нет
Всего: 1

Код


var
  table: variant;
...........
begin
........
W:=CreateOleObject('Word.Application'); // Создаёт объект Word
W.Visible:=true; // Делает Word невидимым
W.Documents.Add; // Добавляет документ

W.Documents.Item(1).Activate; // делает активным файл отчёта
W.ActiveDocument.Tables.Add(Range:=MyRange, NumRows:=nr{количество рядов}, NumColumns:=nc{количество столбцов}); // Добавляет таблицу
Table := W.ActiveDocument.Tables.Item(1); // Присваевает имя таблицу с отчётом
...........
end.

Я вот таким образом вставляю таблицы..

Albinos_x

Дата 27.2.2007, 17:20 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 15
Всего: 108

http://forum.vingrad.ru/topic-84634.html

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »