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

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

Как победить QuickRep.Preview [D6, IB6.x]

Pavus ©   (2002-06-26 10:57:00) 

Как правильно использовать процедуру QuickRep.Preview

Я делаю так:
----
procedure TfmMain.btnRepKvClick(Sender: TObject);
begin
fmRepKv.Show;
fmRepKv.Close;
end;
---
procedure TfmRepKv.FormActivate(Sender: TObject);
begin
QuickRep1.Preview;
end;
---
Однако при попытке закрыть окно Preview оно выскакивает снова и закрывается только со второго раза.
Наверно я неверно вызываю QuickRep1.Preview, поделитесь опытом.

---

Pavus   (2002-06-26 11:12:00) [1]

Спасибо, получилось,
однако в Delphi3 работало как у меня написано, а с 5 перестало :-)

---

Kaban   (2002-06-26 11:02:00) [2]

Насколько я понимаю
procedure TfmMain.btnRepKvClick(Sender: TObject);
begin
QuickRep1.Preview;
end;
и все, больше нечего не нужно

---

Наверх