Показать сообщение отдельно
  #1  
Старый 28.01.2015, 14:11
Onic777 Onic777 вне форума
Прохожий
 
Регистрация: 01.01.2015
Сообщения: 5
Версия Delphi: Borland CPPB 6
Репутация: 10
Печаль Компонент JvgExportExcel выдает ошибку!

Всем привет!
Срочно нужна помощь!!!

Стоит задача вывести определенный DataSet в Excel!!!
После долгих поисков и пыток всяких компонентов, например F1Book, и OLE нашел компонент, который выполняет экспорт в Excel в пакете JEDI!!!

Написал функцию, которая выполняет экспорт:
Код

void __fastcall TFMain::SaveDataToXLS (TZQuery *TDS)
{
sSaveDialog1->Filter = "Write As Microsoft Excel File (*.xls)";
sSaveDialog1->DefaultExt = "xls";
sSaveDialog1->FilterIndex = 1;
if (sSaveDialog1->Execute())
{
JvgExportExcel1->DataSet = TDS;
JvgExportExcel1->SaveToFileName = sSaveDialog1->FileName;
JvgExportExcel1->Execute();
}
}
//---------------------------------------------------------------------------
[/color]


Вызывающая функция выглядит так:
Код

void __fastcall TFMain::sSpeedButton11Click(TObject *Sender)
{
SaveDataToXLS(qSSS);
}



При работающей программе и открытой базе после нажатия на кнопку выдается сообщение отладчика


"Debugger Exception Notification:
Project AAA.exe reised exception class EOleSysError with message "Operation not Accessible". Process Stopped. Use Step or Run to continue"


Жмем RUN!
Загружается Excel, в нем появляется выводимая база без каких либо видимых ошибок, а программа продолжает работать в нормальном режиме...

Что это за ошибка и как ее исправить? Ну или исключить появление сообщения!

С Уважением,
Onic777
Ответить с цитированием