Скачать: CL | DM;

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

← →
Sofronov   (2008-04-26 19:27) [0]

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

---

← →
YurikGL ©   (2008-04-26 21:44) [1]

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

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

---

← →
Sofronov   (2008-04-27 17:56) [2]

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

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

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c