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

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

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

Quick report. Что происходит при минимизации окна просмотра? [D7, MSSQL]

alabama01 © (2006-09-18 07:23:00)
Здравствуйте.
Есть форма диалога, которая по кнопке ОК создает другую форму, на которой размещен quickrep:

procedure TFrepSalesDlg.btnOKClick(Sender: TObject);
begin
if not Assigned(FQrepSales) then
begin
(1) FQrepSales := TFQrepSales.Create(Self);
(2) FQrepSales := nil;
Self.Close;
end;
end;

Форма с QR, в нашем случае FQrepSales, при создании заполняет себя данными и делает QuickRep1.Preview. Если окно предпросмотра закрыть, тогда отрабатывает строка (2) и далее, если же нажать минимизировать окно предпросмотра, то оно вообще исчезает с экрана и код дальше не идет, то есть форма диалога не закрывается и можно еще раз нажать ОК и еще раз создать форму FQrepSales! При минимизации окна просмотра, каким-то образом FQrepSales становится nil. Как это побороть?
Можно ли отловить событие минимизации формы просмотра отчета?

alabama01 (2006-09-19 02:11:00) [1]
Спасибо за ответы. Буду рисовать свое окно просмотра. Тем более, что ничего другого не остается.

Германн (2006-09-19 01:11:00) [2]

> если же нажать минимизировать окно предпросмотра, то оно
> вообще исчезает с экрана

Не совсем так! Оно сворачивается в "полоску над кнопкой Пуск". Где-то такую формулировку я видел на форуме недавно. Увидеть ее можно, минимизировав или закрыв все окна, которые перекрывают эту область.
Ну а правильное решение проблемы предложено в [1]. Своё окно Preview. Это не сложно, тем более автор QR сам довольно подробно описал как это сделать.

Johnmen (2006-09-18 09:26:00) [3]
Ну, наверное, перед обниливанием надо бы сделать Free.
А чтобы в полной мере управлять окном предпросмотра, надо "нарисовать" своё...

Наверх

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