Re: Oversizing images in Quark
Re: Oversizing images in Quark
- Subject: Re: Oversizing images in Quark
- From: Olivier Berquin <email@hidden>
- Date: Mon, 10 Sep 2001 18:06:46 +0200
Hi Mark,
Try this:
-----
tell application "QuarkXPress Passport 4.11"
tell document 1
tell current box
tell image 1
if bounds is {0, 0, 0, 0} then
display dialog "This picture box has no picture." ,
buttons "OK" default button 1 with icon stop
return
end if
set bounds to exact fit
set sca to scale as list
set yP to (item 1 of sca as percent as real) + 0.5 -- +0,5 %
set xP to (item 2 of sca as percent as real) + 0.5 -- +0,5 %
if yP is greater than xP then
set xP to yP
else
set yP to xP
end if
set scale to {yP, xP}
set bounds to centered
end tell
end tell
end tell
end tell
-----
HTH
Olivier.
N.B. For acronyms... <
http://www.acronymfinder.com/>