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

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

Выгрузка данных в Excel [D5]

DiggerAbstract ©   (2002-03-09 09:51:00) 

У меня такой вопрос(немного не по БД) - имеется шаблон с шапкой отчета в *.xls формате, как мне привыгрузке данных сделать так, чтобы на каждой странице отчета была эта шапка

---

DiggerAbstract   (2002-03-09 12:38:00) [1]

Спасибо за ответ, но я уже нашел, для тех кому интересно вот строчки кода:

Ex.ActiveSheet.PageSetup.PrintTitleRows := "$1:$5"{строки которые нужно повторять на каждой странице};
Ex.ActiveSheet.PageSetup.PrintTitleColumns := "";


---

JibSkeart   (2002-03-09 11:36:00) [2]

Var
Xl,Xarr:Variant;
begin
XArr:=VarArrayCreate([1,2],varVariant);
XL:=CreateOLEObject("Excel.Application");
XL.WorkBooks.add;
XL.visible:=true;
XArr[1]:="hello";
XArr[2]:="world";
XL.Range["A"+IntToStr(j),"B"+IntToStr(j)].Value := XArr;
end;


Так Пойдет ??

---

Наверх