Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Заморочки с отчетами (QuickReport) [D4, D5, D6, dBase, FoxPro]


Андрей Брусов ©   (2002-03-21 12:50:00) 

Всем привет. Объясняю суть проблемы. Вернее двух проблем.
1. При использовании Preview, после закрытия окна предварительного просмотра на этапе выполнения частенько возникает Exception с формулировкой ошибка доступа или что-то в этом роде. Программа в принципе продолжает работать нормально, но вообще это здорово напрягает. Не пойму в чем дело. Может кто-то сталкивался?
2. При испльзовании своей формы предварительного просмотра документа, не могу на этапе выполнения открыть сохраненные ранее на Винте отчеты, хотя вроде бы код правильный. Превый выбранный отчет, еще с грехом пополам загружается в окно просмотра, если же я хочу просмотреть еще один, программа капитально виснет. При чем если я использую штатный Preview, то все идет нормально.В чем дело?


Роман Василенко   (2002-03-23 13:41:00) [1]

Попробуй замени Cleanup на следующий вариант:


/////////////////////////////////////////////

if assigned(xx.Qrprinter) then
try
freeandnil(xx.qrprinter);
except
end;

xx.qrprinter:=tqrprinter.create(не помню, что здесь, догадаешься...);

/////////////////////////////////////////////

А дальше - загружай...


Андрей Брусов   (2002-03-22 09:19:00) [2]

1. Что значит использовать qreports1.preview из другой формы?

2. Код обработчика кнопки "Открыть":

procedure TfmMyPreview.tbOpenClick(Sender: TObject);
begin
odMyPreview.InitialDir := work_dir + "Reports";
If odMyPreview.Execute and FileExists(odMyPreview.FileName) Then
begin
fmMyPreview.QRPreview1.QRPrinter.Cleanup;
fmMyPreview.QRPreview1.QRPrinter.Load(odMyPreview.FileName);
end;
end;

где odMyPreview - компонент OpenDialog.


IronHawk   (2002-03-21 14:28:00) [3]


> Андрей Брусов (21.03.02 12:50)

Код в студию ....


sjvorot   (2002-03-21 14:21:00) [4]

Используй qreports1.previev из другой формы и будет все хор.


Наверх

Титульная страница Поиск, карта сайта Написать письмо