Скачать: CL | DM;

Quick report. Что происходит при минимизации окна просмотра?   Найти похожие ветки 

← →
alabama01   (2006-09-18 07:23) [0]

Здравствуйте.
Есть форма диалога, которая по кнопке ОК создает другую форму, на которой размещен 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. Как это побороть?
Можно ли отловить событие минимизации формы просмотра отчета?

---

← →
Johnmen ©   (2006-09-18 09:26) [1]

Ну, наверное, перед обниливанием надо бы сделать Free.
А чтобы в полной мере управлять окном предпросмотра, надо "нарисовать" своё...

---

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

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

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

---

← →
alabama01   (2006-09-19 02:11) [3]

Спасибо за ответы. Буду рисовать свое окно просмотра. Тем более, что ничего другого не остается.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.028 c