глючит экспорт отчёта в Excel

kdy

Мы делаем экспорт отчёта в Excel с помощью frOleExcelExport - экспортируется успешно.
Но если после этого пытаемся открыть какой-то другой отчёт - вываливается сообщение об ошибке "переменная [qTMP."A628"] не определена ". Такая переменная (а точнее это поле из таблицы данных) была в предыдущем отчёте, из которого делался экспорт в Excel. После нажатия кнопки "Отмена" FastReport выводит на предварительный просмотр шапку из того самого первого отчёта, который экспортировался в Excel. А тот отчёт, который мы загружали в LoadFromFile() - такое впечатление, что игнорируется.
Версия FastReport - сначала была 2.52, потом подняли до 2.55 - ошибка остаётся.
PS
Для формирования отчётов используется один и тот же компонент - источник данных, меняется только его свойство SELECTSQL. Отчётов больше десятка, и такая система успешно работает. Пока в одном из отчётов не сделать экспорт в Excel.

Vano

написал:

Мы делаем экспорт отчёта в Excel с помощью frOleExcelExport - экспортируется успешно.
Но если после этого пытаемся открыть какой-то другой отчёт - вываливается сообщение об ошибке "переменная [qTMP."A628"] не определена ". Такая переменная (а точнее это поле из таблицы данных) была в предыдущем отчёте, из которого делался экспорт в Excel. ... А тот отчёт, который мы загружали в LoadFromFile() - такое впечатление, что игнорируется.

Ещё один любителй грузить отчёты из текущей папки ...
Если вы загружаете отчёт без указания полного пути:

frReport1.LoadFromFile('MyReport.frf')

то что происходит при экспорте отчёта в XLS когда вы сохраняете файл в другую директорию? Правильный ответ - текущая директория меняется ...
Теперь нетрудно догадаться почему следующий отчёт уже не грузится ...
Также РЕКОМЕНДУЕТСЯ LoadFromFile пользоваться как функцией, а не как процедурой, т.е. по результату можно обнаружить - а действительно ли отчёт был успешно загружен или нет ...

Правильное написание загрузки отчёта:

if not frReport1.LoadFromFile('C:\Reports\MyReport.frf') then
 MessageDlg('Невозможно загрузить отчет',mtError,[mbOk],0);

P.S. 2 админы - может добавить это в FAQ ?

kdy

Спасибо, Vano.
Уже сами разобрались.
Именно так оно и было.