images slightly distorted when using .SetDstRect and .ScaleWith/.ScaleHeight

Options

View

Last

Unread

Previous Topic Next Topic

This topic and its replies were posted before the current version of LEADTOOLS was released and may no longer be applicable.

#1 Posted : Wednesday, October 5, 2005 9:25:58 AM(UTC)

travis.darby

Groups: Registered
Posts: 1

I have an application where I want to display TIF files. The images are displaying, but the quality of the images isn't what I want. Here is how I am loading the images to the control then resizing to fit the window:

Lead.Load strImagePath, 0, 1, -1
Lead.SetDstRect 0, 0, Lead.ScaleWidth, Lead.ScaleHeight

The problem is when I'm displaying them in ACCESS reports. When they print, it seems like the images are being distorted by the size of the control that I have set causing the printouts to be unreadable. I have changed the size of the control itself, but it doesn't help at all. I have also tried using .PrintScaleWidth and .PrintScaleHeight but that causes the image to get clipped on the right side. when I don't use the .SetDstRect it only shows the top left of the image, for obvious reasons, but it looks perfect. Does anyone have any possible ideas on how to get the image to display better?

Thanks in advance.


	Try the latest version of LEADTOOLS for free for 60 days by downloading the evaluation: https://www.leadtools.com/downloads Wanna join the discussion? Login to your LEADTOOLS Support account or Register a new forum account.

#2 Posted : Saturday, October 8, 2005 11:22:53 PM(UTC)

Maen Hasan

Groups: Registered, Tech Support
Posts: 1,326

Was thanked: 1 time(s) in 1 post(s)

Hello,

How exactly are you printing from Access?
What is the exact LEADTOOLS version that you are using?

However, if you are using LEADTOOLS Main OCX programming interface, you
may try to print the LEAD control image using the Render method (Main
Control). The Render method Prints an image or displays the image in any device context.
You may try to print the image using the following code:
+-----------------------------------------------------+
Dim fWidth As Double
Dim fHeight As Double

LEAD1.Load strImagePath 0, 0, 1

fWidth = LEAD1.BitmapWidth
fHeight = LEAD1.BitmapHeight

hdc = LEAD1.PrintStart
LEAD1.Render hdc, 1, 1, fWidth, fHeight
LEAD1.PrintEnd (hdc)
+-----------------------------------------------------+

Thanks,
Maen Badwan
LEADTOOLS Technical Support

You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.