Grow

2000.03.16 

 

http://www.barefeetware.com/appleworks/grow/

Description

 

This AppleWorks script allows you to resize the selected graphic object(s) by changing its dimensions numerically, stretching down or to the right. Enter a negative number to shrink the object(s).

Enhancement
Pack

 

This is one of 40 scripts in the Enhancement Pack for AppleWorks.

     


Detail
The “Grow” item is in the Drawing sub-menu of AppleWorks Scripts Menu.

When activated, this script asks you for the increment (or decrement if negative) number of pixels and the direction (down or right).

It can be difficult to accurately resize a selected graphic object in AppleWorks, especially when it moves two pixels on the first drag motion. This script makes resizing accurate and consistent across all selected objects.

Advanced
To resize down and to the right, just run the script twice, once for each direction. Use this script instead of dragging to avoid redistributing the space between the selected objects.

Requirements
Operates on each selected graphic object in the selection, in the drawing area of a document.

This script works with AppleWorks 6. An AppleWorks 5 version is in development.

Only registered users are permitted to use the supplied files after 14 days or edit them.

Download
This script is included in the Enhancement Pack for AppleWorks, not supplied separately.

Scripting
This script can be opened to see the code. The central instructions are:

set {leftOld, topOld, rightOld, bottomOld} to bounds of thisObject
if theDirection is "Down" then
   set newBounds to {leftOld, topOld, rightOld, bottomOld + thePixels}
else
   set newBounds to {leftOld, topOld, rightOld + thePixels, bottomOld}
end if
set bounds of thisObject to newBounds


Please email us any queries about this page.