Re: crop left half of image via script / iMagine Photo
Re: crop left half of image via script / iMagine Photo
- Subject: Re: crop left half of image via script / iMagine Photo
- From: Gert van Oss <email@hidden>
- Date: Wed, 15 Jun 2005 08:07:46 +0200
Thanks Kevin,
your iMagine Photo suggestion works like a charm. Maybe you could
give me an example of code where I want to crop for example 21 pixels
from the left, 22 from the top, 23 from the right and 24 from the
bottom of a file. My result until now where I crop the left and the
bottom is below. I just can't get the grip on the grid
Thanks again.
Grt
set chosenFile to choose file
tell application "iMagine Photo"
set thisImporter to import graphic chosenFile
set theprops to the properties of thisImporter
set {x, y, theWidth, theHeight} to the natural bounds of theprops
set the source rectangle of thisImporter to {theWidth div 2.82,
0, theWidth, theHeight div 1.1}
tell thisImporter to make exporter with properties {export file
type:"JPEG", export folder location:path to desktop folder, export
file name:(file name of theprops), export custom icon:true, export
compression quality:high, export resolution:{72.0, 72.0}}
export thisImporter
close thisImporter
end tell
On 14-jun-2005, at 12:25, Kevin Meaney wrote:
Grt
You can use iMagine Photo (free) to crop any part of an image,
Image Events will only crop to the centre.
set chosenFile to choose file
tell application "iMagine Photo"
set thisImporter to import graphic chosenFile
set theprops to the properties of thisImporter
set {x, y, theWidth, theHeight} to the natural bounds of theprops
set the source rectangle of thisImporter to {theWidth div 2, 0,
theWidth, theHeight}
tell thisImporter to make exporter with properties {export file
type:"JPEG", export folder location:path to desktop folder, export
file name:(file name of theprops), export custom icon:true, export
compression quality:high, export resolution:{72.0, 72.0}}
export thisImporter
close thisImporter
end tell
http://www.yvs.eu.com/imagine.html
Kevin
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (Applescript-
email@hidden)
Help/Unsubscribe/Update your Subscription:
40mac.com
This email sent to email@hidden
_______________________________________________
Do not post admin requests to the list. They will be ignored.
Applescript-users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
This email sent to email@hidden