Hello,

I has been a long time I used TQuickReport. Now I have to do something
'quick' and as always it does not work. Probably I forget something
simple. If someone can advice should be very happy with it...

Form with TQuickReport on it, Detailband, and there 2 QrDBText. This
code produces 9 pages which are all blank :( I have 200 records so 9
pages should be ok I think. But the QRDBText labels seems not to display
anything.

Any idea what I could be forgotten ?

procedure TMain.Button1Click(Sender: TObject);
begin
   ADOConnection.Connected := True;
   ADOQuery.SQL.Clear;
   ADOQuery.SQL.Add('select * from Rx');
   ADOQuery.Active := True;

   QR.QrDbText1.DataField := ADOQuery.FieldByName('TxDT').AsString;
   QR.QrDbText2.DataField := ADOQuery.FieldByName('Msg').AsString;
   QR.QuickRep.Preview;

the ADOQuery is here EOF, so it means QuiReport has stepped tru the
records. QR is a second form.

---
Rgds, Wilfried
http://www.mestdagh.biz

__________________________________________________
Delphi-Talk mailing list -> [email protected]
http://www.elists.org/mailman/listinfo/delphi-talk

Reply via email to