* * *

Author Topic: Stretch picture from TImage  (Read 4500 times)

faber

  • Guest
Stretch picture from TImage
« on: August 18, 2010, 11:37:45 am »
How to get stretched picture from TImage ?
I need TPicture (Image1.Picture.Bitmap), but when I take Picture.Bitmap I get orginal picture (loaded from file). I need a bitmap that TImage current shows (in my case stretched).

felipemdc

  • Administrator
  • Hero Member
  • *
  • Posts: 3417
Re: Stretch picture from TImage
« Reply #1 on: August 18, 2010, 11:49:36 am »
Just copy the bitmap to another one and then stretch it yourself.

José Mejuto

  • Full Member
  • ***
  • Posts: 136
Re: Stretch picture from TImage
« Reply #2 on: September 02, 2010, 12:28:48 am »
How to get stretched picture from TImage ?
I need TPicture (Image1.Picture.Bitmap), but when I take Picture.Bitmap I get orginal picture (loaded from file). I need a bitmap that TImage current shows (in my case stretched).

Hello,

You can download sources from http://sourceforge.net/projects/thetvdbartcut/ and inside there are some strenched copies from a base image.

theo

  • Global Moderator
  • Hero Member
  • *****
  • Posts: 1879
Re: Stretch picture from TImage
« Reply #3 on: September 02, 2010, 10:10:00 am »
There is an example here:

http://www.lazarus.freepascal.org/index.php/topic,8282.msg39786.html#msg39786

This is a bit more than what you need, because it ist "zooming" an area of Image1 to Image2, but the principle is the same.

faber

  • Guest
Re: Stretch picture from TImage
« Reply #4 on: September 02, 2010, 12:29:28 pm »
Thanks. Image1.Picture.Bitmap.Canvas.StretchDraw - this is what I was looking for.

 

Recent

Get Lazarus at SourceForge.net. Fast, secure and Free Open Source software downloads Open Hub project report for Lazarus