Solved

Viewing QuickReports on a form

Posted on 1998-02-02
5
1,780 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

[Live Webinar] The Cloud Skills Gap

As Cloud technologies come of age, business leaders grapple with the impact it has on their team's skills and the gap associated with the use of a cloud platform.

Join experts from 451 Research and Concerto Cloud Services on July 27th where we will examine fact and fiction.

Question has a verified solution.

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

The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
In this video, viewers are given an introduction to using the Windows 10 Snipping Tool, how to quickly locate it when it's needed and also how make it always available with a single click of a mouse button, by pinning it to the Desktop Task Bar. Int…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
Suggested Courses
Course of the Month6 days, 17 hours left to enroll

623 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