Экспорт в EXCEL

Комментарии

• gpi

  February 2006 отредактировано February 2006

  Попробуйте на последней версии FR
• -Blade-

  February 2006 отредактировано 08:19

  Скачал и поставил версию 3.20
  Теперь вообще на всех отчетах сообщает следующее:
  EOleSysError with message 'CoInitialize has not be called'
  
  P.S. Экспорт в HTML и RTF работает
  P.P.S. В настройках проекта установлено Build With Run-Time Packages
• -=Serg=-

  February 2006 отредактировано 08:19

  Значит надо написать
  CoInitialize;
• -Blade-

  February 2006 отредактировано 08:19

  Где написать?
• -=Serg=-

  February 2006 отредактировано 08:19

  Какая версия Delphi?
  Добавь uses ActiveX, ComObj
• -Blade-

  February 2006 отредактировано 08:19

  Звиняюсь, версия не Delphi, а Builder'а... 6-я...
  Вот токма я кажется понятно писал... Что на 3.17 версии FastReport'а работали все отчеты кроме одного (в смысле их Export). Поставил свежее (как советовали) - перестали работать все. При чем здесь включи ActiveX или еще что-то, без чего все работало? Отчет элементарный.
• gpi

  February 2006 отредактировано 08:19

  Перестал работать экспорт или формирование отчётов?
• -Blade-

  February 2006 отредактировано 08:19

  Экспорт. И именно в Excel. RTF и HTML - работает... И именно этот отчет, блин, заказчику нужен именно и только в EXCEL!!!!!!!!!!!!!!!!
• gpi

  February 2006 отредактировано 08:19

  Рекомендация -=Serg=- не работает?
  Выложите куда-нибудь fr3 и fp3-файлы одного из отчётов
• Samuray Administrator

  February 2006 отредактировано 08:19

  TfrxXLSExport.FastExport := false;
  
  Так тоже не работает? Какая версия MS Office?
• -Blade-

  February 2006 отредактировано 08:19

  TfrxXLSExport.FastExport := false; - не помогает.
  
  Версия Office - 2003
  Система - Win Server 2003
• -Blade-

  February 2006 отредактировано 08:19

  Кстати... Узнал об этой проблеме именно от заказчика. У него Win ME и офис 2000
• -Blade-

  February 2006 отредактировано 08:19

  Рекомендация -=Serg=- не работает.
• -=Serg=-

  February 2006 отредактировано 08:19

  Какая из?
  Пробуй явно вызывать CoInitialize;
  а в конце CoUnInitialize
• Vano

  February 2006 отредактировано 08:19

  Для "прямого" (без OLE-шного) экспорта в XLS для 2-ки есть полно исходников (в том числе и моих). По-моему проще адапитировать их для 3-ки, чем разбираться во всей этой OLE-шной кухне.
• dron-s Россия

  February 2006 отредактировано 08:19

  написал:

  Какая из?
  Пробуй явно вызывать CoInitialize;
  а в конце CoUnInitialize

  У меня такая же трабла при экспорте в Excel!!!!
  Где прописать эти CoInitialize & CoUnInitialize;
  D7...
• gpi

  February 2006 отредактировано February 2006

  На стабильной 3.20 работает нормально. Попробуй пока на стабильной версии. Сейчас проверю на 3.20.15
  Добавлено
  Проверил на 3.20.15 - всё нормально.
  D7+SP1, XP+SP2, MSOffice 2003
  
• dron-s Россия

  February 2006 отредактировано 08:19

  у меня дельфи с двумя обновлениями стоит а остальное всё тоже самое... но не работает... вылетает с ошибкой что небыл произведён вызов CoInitialize...
• dron-s Россия

  February 2006 отредактировано 08:19

  -Blade-
  делай для экспорта в Excel вот так...

  uses ActiveX;
  .....
  var
    NameRep:TfrxMemoView;
    frxReport: TfrxReport;
    Page: TfrxReportPage;
    frxRTFExport: TfrxRTFExport;
  begin
  
   frxReport:=TfrxReport.Create(frmIndex);
   Page:=TfrxReportPage.Create(frxReport);
   frxRTFExport:=TfrxRTFExport.Create(frmIndex);
  
   Application.ProcessMessages;
   frxReport.LoadFromFile(GetEXEPath + 'fr\Region.fr3');
   NameRep := frxReport.FindObject('NameRep') as TfrxMemoView;
   NameRep.Text := cbRegion.Text;
   frxReport.PrepareReport();
  
   CoInitialize(nil);
   frxReport.Export(frxXLSExport1);
   CoUnInitialize;
   frxReport.Free;
   frxXLSExport1.Free;
  

  ВСЁ РАБОТАЕТ, САМ ЛИЧНО ПРОВЕРЯЛ!!!!!!!
  за помощь сделать работоспособным код, отдельно gpi... THANK YOU!!!