Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Скорость Delphi > Excel 
:(
    Опции темы
uranpro
  Дата 16.7.2008, 10:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
я делаю много отчетов и в них, как обычно, оч много данных.
передача из дельфи в ексель очень медленная, я слышал, что как-то можно увеличить скорость передачи данных.
но увеличить не за счет меньшего кол-ва обращений к серверу, а как-то по другому.
может кто знает какие-то другие варианты ?


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Данкинг
Дата 16.7.2008, 10:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Генераторы отчётов использовать. smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Frees
Дата 16.7.2008, 11:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
я слыхал про такое: когда уже готовую dbf встраивают в excel на фокс про человек дклал, скорость становилось приемлимой даже с большим кол вом данных, но я сам в это не вникал.


--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
Данкинг
Дата 16.7.2008, 11:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(Frees @  16.7.2008,  12:10 Найти цитируемый пост)
уже готовую dbf встраивают в excel на фокс про 

Это как, из фокса сделать экспорт в XLS? Типа:

Код

export to base as 866 xls

Да, так, разумеется, экспортнётся быстро, только, во-первых, вроде как про фокс речи не идёт, а, во-вторых, это не всегда может быть удобно.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
uranpro
Дата 16.7.2008, 11:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
=)

Добавлено через 8 минут и 55 секунд
Данкинг, так нужно еще какой-то вид предать отчету


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Данкинг
Дата 16.7.2008, 11:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(uranpro @  16.7.2008,  12:20 Найти цитируемый пост)
Данкинг, так нужно еще какой-то вид предать отчету

В общем-то, можно из фокса экспортнуть, а потом уже получившийся XLS открыть и отредактировать, как надо.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
uranpro
Дата 16.7.2008, 11:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
Данкинг, так основное время формирования отчета занимает составление вида=( 


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Данкинг
Дата 16.7.2008, 11:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130
Цитата(uranpro @ 16.7.2008,  12:34)
Данкинг, так основное время формирования отчета занимает составление вида=(

А если сделать шаблон файла XLS с основным видом и копировать его в нужную папку, а потом подставлять данные?


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
uranpro
Дата 16.7.2008, 12:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
Данкинг, можно, но не для всех отчетов.


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Frees
Дата 16.7.2008, 13:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54
тогда генератор отчетов smile


--------------------
Кольцов Виктор Владимирович
PM MAIL ICQ   Вверх
pseud
Дата 16.7.2008, 18:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Экспёрт Тыдыщ
***


Профиль
Группа: Завсегдатай
Сообщений: 1175
Регистрация: 18.5.2007
Где: Минск, Беларусь

Репутация: 16
Всего: 40
Цитата(uranpro @  16.7.2008,  10:20 Найти цитируемый пост)
передача из дельфи в ексель очень медленная, я слышал, что как-то можно увеличить скорость передачи данных.


передача данных не поштучно, а пакетом через буфер.

что-то типа

Код

var
  XLArrayData : OLEVariant;
begin
  ...
  XLArrayData := VarArrayCreate([1, iRowsCount, 1, iColumnsCount], varVariant);

  // шапка
  for j:= 1 to iColumnsCount do
  begin
    XLArrayData[1, j] := dxDBTreeEntities.VisibleColumns[j - 1].Caption;
  end;

  Node := dxDBTreeEntities.TopNode;

  // данные
  for i := 2 to iRowsCount do
  begin
    for j:= 1 to iColumnsCount do
      XLArrayData[i, j] := Node.Strings[dxDBTreeEntities.VisibleColumns[j - 1].Index];

    Node := Node.GetNext;
  end;

  XLCellBegin := XLSheet.Cells[1, 1];
  XLCellEnd := XLSheet.Cells[iRowsCount, iColumnsCount];
  XLRange := XLSheet.Range[XLCellBegin, XLCellEnd];

  // передача массива данных в эксцель
  XLRange.Value := XLArrayData;
...




--------------------
Испытание чужого терпения можно считать успешным, если оно лопнуло...
PM MAIL   Вверх
Albinos_x
Дата 16.7.2008, 18:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Evil Skynet
****


Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 1
Всего: 108
http://forum.vingrad.ru/forum/topic-84634.html


--------------------
"Кто владеет информацией, тот владеет миром"    
Уинстон Черчилль
PM MAIL ICQ   Вверх
uranpro
Дата 17.7.2008, 10:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
pseud, нуу... я так и делаю))) я же в начале написал))


Albinos_x, мм... сча посмотрим


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
December
Дата 17.7.2008, 11:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: нет
Всего: 57
У меня была проблема с производительностью при работе с екселем через ActiveX. Решилась путём временного отключения пересчёта формул в листе/документе.


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
uranpro
Дата 17.7.2008, 11:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
December, а если формул нет ?


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
December
Дата 17.7.2008, 12:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: нет
Всего: 57
Тогда не поможет smile


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
uranpro
Дата 17.7.2008, 13:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
ыы))


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Akella
Дата 21.7.2008, 18:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329
Можно же сохранять в DBF, а потом открывать экселем
PM MAIL   Вверх
uranpro
Дата 21.7.2008, 18:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
Akella, фсе цвета, сетки. форматы, размеры шрифта... тоже там можно сохранить ?

Добавлено через 2 минуты и 33 секунды
нашел TXLSFile скорость 75000 в сек оО только платная))



--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Akella
Дата 21.7.2008, 23:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329
Цитата(uranpro @  21.7.2008,  18:21 Найти цитируемый пост)
цвета, сетки. форматы, размеры шрифта

ууууу smile , тогда да, будет медленно.
Можно создавать массив, а потом этот массив накладывать на диапазон, ну а потом форматы присваивать.
PM MAIL   Вверх
orthrus
Дата 22.7.2008, 06:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 400
Регистрация: 30.10.2007
Где: г. Усть-Илимск(Ир кутская обл.)

Репутация: нет
Всего: 16
Есть еще такой очень удобный компонент AfalinaSoft XL Report, работает очень быстро


--------------------
У того, кто ничего не делает, всегда много помощников.© Л.Н. Толстой
user posted image
PM MAIL ICQ   Вверх
uranpro
Дата 22.7.2008, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 571
Регистрация: 7.5.2008
Где: Moscow city

Репутация: нет
Всего: 1
Akella, знаю, работает не на много быстрее, есть небольшие проблемы с использованием массивов. 


orthrus, сча посмотрим)

Добавлено через 44 секунды
ого)))) я стал "бывалый" )))


--------------------
I want a perfect soul
PM MAIL ICQ   Вверх
Scandium
Дата 25.7.2008, 01:40 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 3.12.2007

Репутация: нет
Всего: нет
Доброго времени суток!
Коннект создаю через TExcelApplication (у меня называется m_ExcelApplication).
Изменяю фонт ячейки и добавляю в неё текст и... не происходит изенение фонта smile ... Что можно сделать? Причём ЧекБоксы o_StyleExcelReport_title_bold.Cheked, Options.o_StyleExcelReport_title_italic.Cheked, Options.o_StyleExcelReport_maintext_underline.Checked на 100% имеют значение true.
Код

    WorkSheet:=m_ExcelApplication.Worksheets.Get_Item(1) as _WorkSheet;
    WorkSheet.Name:=m_TabControl.Tabs[m_TabControl.TabIndex];
    //Вставляем заглавие Листа, стиль из "заглавие Excel"
    If Options.o_StyleExcelReport_title_bold.Checked then
      WorkSheet.Range['A1','A1'].Font.FontStyle:=WorkSheet.Range['A1','A1'].Font.FontStyle+'bold';
    If Options.o_StyleExcelReport_title_italic.Checked then
      WorkSheet.Range['A1','A1'].Font.FontStyle:=WorkSheet.Range['A1','A1'].Font.FontStyle+'italic';
    If Options.o_StyleExcelReport_maintext_underline.Checked then
      WorkSheet.Range['A1','A1'].Font.FontStyle:=WorkSheet.Range['A1','A1'].Font.FontStyle+'underline';
    WorkSheet.Cells.Item[1,1]:='Определение грубых ошибок среди эксперементальных данных (Q-test)';
PM MAIL   Вверх
Akella
Дата 25.7.2008, 07:56 (ссылка) | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329
Scandium, как твой вопрос относится к данной теме? А?
PM MAIL   Вверх
Страницы: (2) [Все] 1 2 
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0958 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.