Mega Code Archive

 

Categories / Delphi / ADO Database

 

Blank form at design or run time

Question: Using QuickReports 2, I have a report with only a title band and some QRLabels, at design or run time I can not print or preview the form (It is blank). What is wrong? Answer: Most likly, QuickReport doesn't think you any Data to print or preview. At runtime you can tell QR to print using this techinque: On the Report's OnNeedData event, add this code: If Form1.tag = 0 then begin MoreData := True; Form1.Tag := 1; end else MoreData := False; This tells the QR component that it got data, go ahead and print. Then the component on the next time into the event to stop - no longer needs data avoiding an infinite loop. Of couse Form1's tag property is simple being used as a flag, thus can be replaced by any other flaging scheme.