Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printing images on a report
Message
From
05/01/2004 10:54:32
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Miscellaneous
Thread ID:
00863697
Message ID:
00863890
Views:
13
>>>I have a client that has a need for printing images on a report. We havce a limited amount of space and unfortunately, the graphics are of varying sizes. We have set the image up to "size to fit" since that will keep the shape. However, if it dosen't fit properly, then there is a grey section for the area that doesn't have any image in it. I have tried many things to get rid of it including making a different application associated with the images. Nothing works.
>>>
>>>This is VFP 8 with SP1. I don't know if that is important, but figured I would throw it out there.
>>
>>I don't see the effect you describe. However I did it like this :
>>-Created a report named myPicReport. I added an 'Picture/Activex Control' and sized to my taste. Dblclicked it and set :
>>File : (myPicFile)
>>Scale picture,retain shape
>>-Saved and run little test.prg below :
>>
>>lnGif = ADir(aGIF,'bmps\*.GIF')
>>lnJPG = ADir(aJPG,'bmps\*.JPG')
>>lnBMP = ADir(aBMP,'bmps\*.BMP')
>>Create Cursor myPics (myPicFile m)
>>For ix=1 to Min(lnGIF,20) && I want 20 at most
>>  Insert into myPics values (FullPath('bmps\'+aGIF[ix,1]))
>>endfor
>>For ix=1 to Min(lnJPG,20)
>>  Insert into myPics values (FullPath('bmps\'+aJPG[ix,1]))
>>endfor
>>For ix=1 to Min(lnBMP,20)
>>  Insert into myPics values (FullPath('bmps\'+aBMP[ix,1]))
>>endfor
>>Report Form myPicReport preview
>>
>
>Cetin,
>
>It does not happen when previewing. Strictly when printing.

I see, I didn't try to print :) Then I'd try creating an HTML on the fly and printing from it.
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Reply
Map
View

Click here to load this message in the networking platform