Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win


Changing image width and height in CR8.5

Posted on 2008-10-07
Medium Priority
Last Modified: 2008-11-15
I have upload in a MSSql server database all the images I need, I have connected the table with CR8.5 (ODBC) and I am displaying images on my report. However, all images are displayed with the original image width & height, resulting in stretching. is there anyway to set the width and height properties of the blob field while printing records?
thank you
Question by:giannisg5
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
  • 3
  • 2
LVL 101

Expert Comment

ID: 22659645
None that we have found.

The only solution seems to be to put several images boxes on the screen of different sizes and show the one you need for the particular image.


Author Comment

ID: 22659691
How do you know which image box to display? Do you suppress the rest?
LVL 101

Expert Comment

ID: 22660302
I don't recall the exact solution or how the suppression was done.  

Yes, you use conditional suppression based on a field in the database.  Perhaps the image name?

How to Use the Help Bell

Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention.  Check out this how-to article for more information.


Author Comment

ID: 22667392
I used vb6 and the cr85 designer in order to determine the width and height of the image. I know on which section the OLE object is and which index it is, however I cannot find how to set the width and height. Can you help?

Private Sub sect_Format(ByVal pFormattingInfo As Object)
Dim bmp As StdPicture

With sect.ReportObjects
    Set .Item(2).FormattedPicture = LoadPicture(App.Path & "\111.jpg") 'default
    If FileExists(App.Path & "\" & .Item(1).Value & ".jpg") Then
        If .Item(1).Value <> "" Then
            Set bmp = LoadPicture(App.Path & "\" & .Item(1).Value & ".jpg")
            Set .Item(2).FormattedPicture = bmp
        End If
    End If
End With

End Sub

if the section i want to access is on a subreport, how to you reference that?
thank you
LVL 101

Expert Comment

ID: 22668878
You might try using the Format event of the report or section.

To get at a subreport you open the subreport as a report then reference it as a report.


Accepted Solution

Computer101 earned 0 total points
ID: 22967529
PAQed with points refunded (250)

EE Admin

Featured Post

Tech or Treat!

Submit an article about your scariest tech experience—and the solution—and you’ll be automatically entered to win one of 4 fantastic tech gadgets.

Question has a verified solution.

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

There have always been a lot of questions related to when Crystal Reports evaluates report components (such as formulas, summaries, cross-tabs, charts, to name a few examples). Crystal Reports uses a two-pass reporting process to provide greater …
Hello everyone, Hope you find this as helpful as we did. We have on the company I work for an application built in Delphi V with Crystal Reports 8. We all know that Crystal & Delphi can be temperamental sometimes and the worst thing is, nearly…
Have you created a query with information for a calendar? ... and then, abra-cadabra, the calendar is done?! I am going to show you how to make that happen. Visualize your data!  ... really see it To use the code to create a calendar from a q…
We’ve all felt that sense of false security before—locking down external access to a database or component and feeling like we’ve done all we need to do to secure company data. But that feeling is fleeting. Attacks these days can happen in many w…
Suggested Courses

618 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