Solved

Quickreport for not DB programs ?

Posted on 1998-03-08
7
377 Views
Last Modified: 2013-11-22
hello,

does anyone know if it is possible to use quickreport in non-database programs ?

I need to print to some listviews. Is there another way printing such lists.

thanx
0
Comment
Question by:mories
  • 3
  • 2
  • 2
7 Comments
 
LVL 2

Expert Comment

by:Waldek
ID: 1360257
You must use events onNeedData and BeforePrint. If You want example , tell
0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1360258
Ho Mories,

Yep, Waldek is correct, but the problem is that QR always (not in D1, I believe) needs the BDE....(So you've to install this one too)  I think you can better use another component if you want to print non-database. Look at this one : (http://www.public.usit.net/bmenees) it 's offcourse freeware.

Regards, Zif.


0
 
LVL 1

Author Comment

by:mories
ID: 1360259
Waldek,
could you please give me an example ?

--

Zifnab ?

i cannot find the site you name (file not found)
0
ScreenConnect 6.0 Free Trial

At ScreenConnect, partner feedback doesn't fall on deaf ears. We collected partner suggestions off of their virtual wish list and transformed them into one game-changing release: ScreenConnect 6.0. Explore all of the extras and enhancements for yourself!

 
LVL 2

Expert Comment

by:Waldek
ID: 1360260
You must create a report with QRLabels for data from list.
Then on BeforePrint method You must set a global variable for counter and PrintReport variable true if list count > 0
Example
.. BeforePrint ...
begin
 Counter:=0;
 PrintReport:=List.Count > 0;
end;

Then in method onNeedData You must set a QRLabels caption with data
For example
.... NeedData ....
begin
 If counter < List.count then
  begin
   QRLabel1.Caption:=List.Items[counter]........
   Inc(counter)
   MoreData:=counter<=List.Count; // More data ?  
  end;
end;

Try this , if You want more explain , tell
0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1360261
Mories,

Well, I know that Bill Menees stopped working in Delphi and that's why his component became freeware. So it can be that he stopped with his page too. Well, if you're interested, I still can send you the component. I've got it here.

So, if you want it, just send me how I can send it to you. Maybe the easiest way is it by email.

Regards, Zif.
0
 
LVL 1

Author Comment

by:mories
ID: 1360262
Waldek,

works really great thanx alot !!!

if you add an answer to this question i can assign the points to you...

thanx again..
0
 
LVL 2

Accepted Solution

by:
Waldek earned 100 total points
ID: 1360263
Thanks for points Mories
0

Featured Post

Does Powershell have you tied up in knots?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

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

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…

809 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