| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как создать/перенести в Word таблицу с данными?

Sofronov ©   (2008-04-26 19:27:00) 

С запуском Word-а всё понятно:
uses ComObj;
...
procedure RunWord;
var Word: variant;
begin
 try
   Word := CreateOleObject('Word.Application');
 except
   ShowMessage('Не могу запустить MS Word');
 end;
end;
А как создать/перенести в Word таблицу с данными? Для меня главное – фиксированная ширина колонок и автоподбор высоты по содержимому.

---

Sofronov   (2008-04-27 17:56:00) [1]

Точно! Именно с таким примером я и пытался работать!!! )))

Всё работает за исключением процедуры:
TableExport(ADODataSet1,'Живущие на улице Ахметова','АХМЕТОВА');
Почему-то она срабатывает не корректно и колонки сливаются в одну!

Как быть я не знаю:
- создавать таблицу вручную и заполнять;
- или разбираться, почему процедура не срабатывает

так или иначе без Вашего совета мне не обойтись! а лучше примера )))

---

YurikGL   (2008-04-26 21:44:00) [2]

http://www.delphimaster.ru/articles/dbtoword/index.html

Здесь есть в том числе создание таблицы.

---

Наверх