Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
18.02.2003, 15:14:24
|
|||
|---|---|---|---|
|
|||
Экспорт в Exel |
|||
|
#18+
Как организовать экспорт данных из таблиц IB5 или DB4 в Exel, только не по ячейкам я всю таблицу целиком программным путем. Заранее благодарен. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
18.02.2003, 17:30:58
|
|||
|---|---|---|---|
Экспорт в Exel |
|||
|
#18+
Насколько большие таблицы? У екселя есть ограничение на кол-во строк ;).... Рассказываю в двух словах.... Вычисляется размерность таблицы, создается ВАРИАНТНЫЙ массив вычисленной размерности, в цикле заполняется.... Затем коннектимся к ёкселю и разом "выплевываем" подготовленный массив в нужное место.... Как коннектиться к этому монстру, можно посмотреть в дельфийских демо-приложениях... Да и в инете такой инфы полно.... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
19.02.2003, 23:51:45
|
|||
|---|---|---|---|
|
|||
Экспорт в Exel |
|||
|
#18+
А все-таки как сконнектиться, в двух словах ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
20.02.2003, 00:04:00
|
|||
|---|---|---|---|
|
|||
Экспорт в Exel |
|||
|
#18+
А все-таки, как сконнектиться в двух словах. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
20.02.2003, 14:21:36
|
|||
|---|---|---|---|
|
|||
Экспорт в Exel |
|||
|
#18+
...... if p = ctNewWorkbook then begin ElApplication.ConnectKind := ckRunningOrNew; ElApplication.Connect; ElWorkbook.ConnectTo(FElApplication.Workbooks.Add(TOleEnum(xlWBATWorksheet), LCID)); FExcelWorksheet.ConnectTo(FExcelWorkbook.Worksheets as _Worksheet); end else if .......... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=58&mobile=1&tid=2119085]: |
0ms |
get settings: |
10ms |
get forum list: |
16ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
60ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
46ms |
get tp. blocked users: |
2ms |
| others: | 217ms |
| total: | 373ms |
| 0 / 0 |
