Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printing of pictures(JPG) in reports?
Message
From
17/06/2001 16:58:26
 
 
To
17/06/2001 13:04:09
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00520381
Message ID:
00520405
Views:
18
>Hi,
>
>I would like to be able to add the printing of a picture to one of my reports.
>The picture is unique to each record, a feature not supported by the report designer.
>
>It is perhaps possible to insert the picture in a General Field or even in a Memo field, but I would rather not do that, I feel very comfortable having the pictures in their separate JPG files, that works great in forms.
>
>it might perhaps also be possible to go via MSWord or Excel, but I guess that would mean a lot more work with subjects I know too little about...
>
>
>Also, the pictures on my picture navigating buttons (wizstyle.vcx) disappear when running the compiled program in the destination directory, but they show all right as long as I am running in the project development directory. What can the cause be?

If you can print your reports one page at a time you can do something like this:
* Define your report to use some fixed file name, like ReportPic.JPG

SELECT ReportDrivingCursor
SCAN ALL
  CLEAR RESOURCES ReportPic.JPG
  * Above is necessary otherwise VFP caches the first image
  * and uses for all subsequent calls

  COPY FILE ThisRecordsPic.JPG TO ReportPic.JPG

  REPORT FORM MyReport NEXT 1 ...

ENDSCAN
If you want to run all pages in a single REPORT FORM command, you can put a non-printing UDF in the report's Page Footer that accomplishes the same thing (i.e. CLEAR RESOURCE and COPY the appropriate file for the *next* report page).
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform