C5.5, ШВС
Пробую пользовать классы DirectExcel Олега Руденко для простой таблицы из очереди без шапки.
За основу взял пример из комплекта DExcel
В Global Properties вставляю
Код: Выделить всё
embed
INCLUDE('dEXCEL.INC')
embed
XLS dExcelTbl
Procedure formxls
T QUEUE,PRE(T)
Name STRING(60)
Sum1 DECIMAL(11,2)
Sum2 DECIMAL(11,2)
Sum3 DECIMAL(11,2)
Sum4 DECIMAL(11,2)
.
code
! формирую очередь Table
.............................
! формирую таблицу
XLS.ShowError = True
XLS.CreateFile('Rpt.xls')
!XLS.SetTblFormat(?RptList) ! строка из примера пропускаю
!XLS.Write:Header() ! строка из примера пропускаю
XLS.Write:Table(T)
XLS.CloseFile(True)
Подозреваю, что из-за пропуска XLS.SetTblFormat(?RptList), а форматировать таблицу и задавать шапку без структуры List нельзя?
Классами никогда не пользовался, видимо поэтому очевидные вещи не доходят.
В исходнике записано что для создания таблицы обязательными пунктами являются:
1. Создаем пустой файл (метод CreateFile).
.....................
9.Записываем данные в нужные ячейки, используя созданные ранее стили отображения (метод Write). ?????????
10.Закрываем созданный файл
Что делаю неправильно? или может кто-нибудь просто бросит пример формирования несложной таблицы в APP?
Best regards,
ATAMANOV mailto:ase@email.kht.ru
(Добавление)
SetTblFormat() на данный момент единственный способ заставить правильно сформироваться Excel-файлу, если, конечно, не курочить сами классы. То есть вся информация о количестве столбцов таблицы берётся из листбокса. Олег Руденко обещал в следующей версии dExcel сделать управление формированием более гибким.
С уважением, Михаил.
Написал: ClaList(2)