making a thumbnail from a snapshot

[Peter Brigham MD]

Useful utility, thanks.

-- Peter

Peter M. Brigham
pmbrig at gmail.com
http://home.comcast.net/~pmbrig


On Feb 14, 2010, at 4:09 PM, Mark Schonewille wrote:

> Hi Peter.
>
> I use this function to create thumbnails:
>
> function rescale theImgWidth,theImgHeight,theCdWidth,theCdHeight
>  -- determine longest side and rescale
>  if theCdWidth/theImgWidth < theCdHeight/theImgHeight then
>    put theCdWidth / theImgWidth into myRatio
>  else
>    put theCdHeight / theImgHeight into myRatio
>  end if
>  put theImgWidth * myRatio into myNewWidth
>  put theImgHeight * myRatio into myNewHeight
>  return myNewWidth,myNewHeight
> end rescale
>
> Usually, I have a background object, e.g. a rectangular graphic, in  
> which I want to fit a picture. I'd do this as follows.
>
> lock screen
> clone picture "Original"
> set the name of it to "Thumb"
> put rescale(the width of img "Thumb",the height of img "Thumb",the  
> width of grc "Back",the height of grc "Back") into myNewDimensions
> set the width of img "Thumb" to item 1 of myNewDimensions
> set the height of img "Thumb" to item 2 of myNewDimensions
> set the loc of img "Thumb" to the loc of grc "Back"
> unlock screen
>
> --
> Best regards,
>
> Mark Schonewille
>
> Economy-x-Talk Consulting and Software Engineering
> Homepage: http://economy-x-talk.com
> Twitter: http://twitter.com/xtalkprogrammer
>
> Economy-x-Talk is always looking for new projects.
>
> Op 14 feb 2010, om 00:03 heeft Peter Brigham MD het volgende  
> geschreven:
>
>> I'm trying to make a thumbnail from a snapshot of an image from  
>> another substack. First I clone a group that contains a thumbnail  
>> image and a text field, then I reposition the new group, then I try  
>> to get a new thumbnail into the new group. Here's what I've tried  
>> (partial script):
>>
>>  clone group "imgItem 1"
>>  set the name of it to newGpName
>>  --  newGpName is already constructed, it is "imgItem k" for some k
>>  --  now set location of new group
>>  set the top of group newGpName to 30
>>  set the left of group newGpName to the left of group "imgItem 1"
>>  --  store the new rect of the thumbnail, then delete it
>>  put the rect of img "mThumb" of group newGpName into thumbRect
>>  delete img "mThumb" of group newGpName
>>  --  import new image into cloned group (last group)
>>  start editing group newGpName
>>  import snapshot from image "mDisplay" of stack "dispStack"
>>  --  rename image
>>  set the name of last image to "mThumb"
>>  stop editing background newGpName
>>  --  resize image to thumbnail size and location
>>  set the rect of img "mThumb" of group newGpName to thumbRect
>>
>> What I get is not a properly sized thumbnail -- I get an image that  
>> looks the size of the whole new (cloned) group, and it's not a  
>> miniature of the big image, it's a crop of the big image. I can't  
>> remember how to miniaturize an imported snapshot down to thumbnail  
>> size. I know this has been discussed before but can't find it in  
>> the gmane archives. Any help appreciated.
>>
>> -- Peter
>>
>> Peter M. Brigham
>> pmbrig at gmail.com
>> http://home.comcast.net/~pmbrig
>>
>
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your  
> subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-revolution