| View previous topic :: View next topic |
| Author |
Message |
jcahi Guest
|
Posted: Sun Mar 18, 2007 8:12 am Post subject: Zoom JPG |
|
|
How to zoom a JPG pic?
Yaakov |
|
| Back to top |
|
 |
Marc Rohloff [TeamB] Guest
|
Posted: Tue Mar 20, 2007 6:48 am Post subject: Re: Zoom JPG |
|
|
On Sun, 18 Mar 2007 07:15:35 +0200, jcahi wrote:
| Quote: | How to zoom a JPG pic?
|
Basically you need to create a TPicture and load your image into it.
Then you can use the StretchDraw method of any canvas (say athe Canvas
of a TPaintBox). You give StretchDraw a rectangle and your image, the
larger the rectangle the more you will appear to be zoomed in.
--
Marc Rohloff [TeamB]
marc -at- marc rohloff -dot- com |
|
| Back to top |
|
 |
jcahi Guest
|
Posted: Tue Mar 27, 2007 3:04 pm Post subject: Re: Zoom JPG |
|
|
Thank you
I tried this:
image1.Picture.LoadFromFile('untitled.bmp');
image1.Canvas.StretchDraw(rect(0,0,1024,768),image1.Picture.Graphic);
it is workimg only with BMP not witm JPG.
Yaakov
____________________________ ???? ?????? - ?????? - ?????? ???? ????:
02-5000222#354 ???? : 0507588278 ???: 02-5381615 E-Mail
:yaakovz (AT) idealtours (DOT) co.il
"Marc Rohloff [TeamB]" <"on request"> wrote in message
news:nzkzrvfenu0a$.dlg (AT) dlg (DOT) marcrohloff.com...
| Quote: | On Sun, 18 Mar 2007 07:15:35 +0200, jcahi wrote:
How to zoom a JPG pic?
Basically you need to create a TPicture and load your image into it.
Then you can use the StretchDraw method of any canvas (say athe Canvas
of a TPaintBox). You give StretchDraw a rectangle and your image, the
larger the rectangle the more you will appear to be zoomed in.
--
Marc Rohloff [TeamB]
marc -at- marc rohloff -dot- com |
|
|
| Back to top |
|
 |
Marc Rohloff [TeamB] Guest
|
Posted: Wed Mar 28, 2007 5:52 am Post subject: Re: Zoom JPG |
|
|
On Tue, 27 Mar 2007 12:04:24 +0200, jcahi wrote:
| Quote: | it is workimg only with BMP not witm JPG.
You need to add the 'peg' unit to the uses clause of your project. You |
may have to copy the unit off of your installation CD.
--
Marc Rohloff [TeamB]
marc -at- marc rohloff -dot- com |
|
| Back to top |
|
 |
|