Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

QReport ?? !!! ???? !!! [D5, dBase, FoxPro, ]

Страницы: < 1 2
Koks © (2002-01-08 14:43:00)
Использую QReport. Поместил его на отдельную форму (fmQForm), следуя многочисленным рекомендациям.
Эту самую форму создаю динамически в ран-тайме. И уничтожаю тоже в рантайме после использования.
Столкнулся с такой проблемой:

Procedure DoReport;
begin
Application.CreateFrom(TfmQForm, fmQForm);
fmQReport.Show;
fmQreport.MyReport.Preview;
end;
{до сих пор все работает нормально, отчет превьюится правильно, все путем)
но вот когда я закрываю preview отчета кнопкой close или через оконное меню ([X]),
то получается что я закрываю именно отчет, а не форму на которой он находится....
причем эта форма выглядит очень непрезентабильно....)

Как сделать так, чтобы вместе с отчетом автоматически закрывалась и форма на которой он\
находится?...

Пробовал так:

procedure MyReport.AfterPreview(Sender: TObject)
begin
Close; {метод формы}
end;

...... на этом месте выдается ошибка Invalid floating point operation !!!!!
какой-то бред.....

Пробовал открывать fmQuery через ShowModal, а отчет превьюить в обработчике OnShow формы, результат
почти такой же....

Пробовал использовать отчет напрямую, без формы (ка это предлагается в File - > New - > Report)....
Все вроде работатает, но после уничтожения отчета MyReport.Free начинаются такие глюки.... причем во всей программе....

Посоветуйте хоть че нибудь - все праздники бился.....

panov (2002-01-08 17:49:00) [21]
Qreport для Preview сам создает и показывает форму модально.

panov (2002-01-08 17:47:00) [22]
>Anatoly Podgoretsky © (08.01.02 17:39
Нет, все нормально так работает...

Anatoly Podgoretsky (2002-01-08 17:39:00) [23]
А не PreviewModal?
Иначе fRep будет сразу уничтожен.

panov (2002-01-08 15:19:00) [24]
Я всегда делаю вот так.
Пока проблем не было...

Application.CreateForm(TfRep, fRep);
fRep.qrPP.Preview;
fRep.Free;

Страницы: < 1 2

Наверх

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