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

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

Закрыть QuickReport

Mintos ©   (2006-07-24 13:31:00) 

АДМИН не удаляй вопрос, уже в третий раз пишу! Вопрос конкретно по тематике!

Как можно програмно закрыть QuickReport?

---

Виталий Панасенко   (2006-07-24 16:06:00) [1]

Это продолжение предыдущей тематики о QRExpression ?
procedure TForm1.Button2Click(Sender: TObject);
begin
 FSum := 0;
  QuickRep1.Prepare;//ПРОСТО ПОДГОТАВИЛИВАЕМ ОТЧЕТ. Отображать не будем
 Button2.Caption := FloatToStr(FSum);
end;

procedure TForm1.DetailBand1AfterPrint(Sender: TQRCustomBand;
 BandPrinted: Boolean);
begin

 Fsum := FSum + QRExpr1.Value.dblResult

end;

---

Johnmen   (2006-07-24 13:50:00) [2]

QR.Free;
QR:=nil;

---

Наверх