Solved

Viewing QuickReports on a form

Posted on 1998-02-02
5
1,760 Views
Last Modified: 2013-11-22
How can I view a quickreport on a form in a QRPreview component instead of the default full screen quick report preview?
0
Comment
Question by:hboys
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2
5 Comments
 
LVL 8

Expert Comment

by:ZifNab
ID: 1358119
What if you change the form settings of that QRPreview form?
0
 
LVL 2

Author Comment

by:hboys
ID: 1358120
once the report has been added to a form how can i navigate through the pages (i.e. how can i add buttons to change page numbers, print etc.)
0
 
LVL 8

Accepted Solution

by:
ZifNab earned 100 total points
ID: 1358121
Hi hboys,  I already answered such a question, here it is :

                   The Page is defined as the pagenumber. So:

                   First page : QRPreview1.PageNumber := 1;
                   Next page : QRPreview1.PageNumber := QRPreview1.PageNumber + 1;
                   Previous : QRPreview1.PageNumber := QRPreview1.PageNumber -1;
                   Last : QRPreview1.PageNumber := QRPreview1.PageCount;

                   Use Zoom, ZomeToFit, ZoomToWidth to use zoom capabilities.

                   Go to PrintSetup for printersettins : QRPrinter1.PrintSetup.

                   Have fun,
                   c.u. ZifNab;
0
 

Expert Comment

by:buliang
ID: 1358122
1.put a Tqrpreview component on form1

2.add the following code to your quickrep onpreview event.
procedure Tqrform.qr1Preview(Sender: TObject);
begin
  form1.QRPreview1.QRPrinter := TQRPrinter(Sender);
end;

3.zoom in  
QRPreview1.Zoom := QRPreview1.Zoom + 20;

4.zoom out  
QRPreview1.Zoom := QRPreview1.Zoom - 20;

0
 
LVL 2

Author Comment

by:hboys
ID: 1358123
thanks for the help with this problem.

Harry Boys.
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
How to Install VMware Tools in Red Hat Enterprise Linux 6.4 (RHEL 6.4) Step-by-Step Tutorial

737 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question