Image Events pad command

Question

Hi all
Does anyone know if it's possible to use the "pad" command in Image Events to add white pixels as opposed to black?
I have a script which shrinks PDFs and converts them to JPGs for display on a web site, but the proportions of the PDFs don't quite match up to those required for the JPGs. It would be handy if I could add five white pixels down each side of the JPGs, but "pad" only seems to add black ones.
Cheers,
H

Answer 1

H,
Image Events can't do that.
iMagine Photo which is like Image Events but with more functionality can do this.
The following script will replace the contents of the selected jpeg file with a new image that has a 5 pixel wide border down the left and right edges of the image.
iMagine Photo is free and can be downloaded from:
http://www.yvs.eu.com/downloading.html
Kevin
------ Start Script
on run
AddWhiteBorder()
end run
on AddWhiteBorder()
set thisFile to choose file with prompt "Select a jpg file: "
tell application "iMagine Photo"
set thisImporter to import graphic thisFile
set {x, y, xDim, yDim} to the natural bounds of thisImporter
set xDim to xDim + 10 -- add 5 pixels to the the width of each side
set thisDocument to make graphic document with properties {dimensions:{xDim, yDim}}
tell thisDocument to create composition element with properties {class:filled rectangle, bounds rectangle:{0, 0, xDim, yDim}, color:{65535, 65535, 65535}}
set the drawing destination of thisImporter to thisDocument
set the top left point of thisImporter to {5, 0}
draw thisImporter
set the export file type of thisDocument to "JPEG"
set the export file location of thisDocument to the file location of thisImporter
export thisDocument
close thisImporter
close thisDocument
end tell
end AddWhiteBorder
------ End Script