image compress

[Brian Yennie]

Rick,

> on mouseUp
>   answer file "image to compress:"
>   if it is empty then exit mouseup
>   put it into timage

Looks like you're just saving the file _path_ here.
Change this:

put it into timage

TO

put url ("binfile:"&it) into timage

>   put compress(timage) into URL "binfile:/CSMLS Moncton/DATA/AREA"
> end mouseUp

Keep in mind that a lot of image formats are already compressed, and 
zip compression is much better suited for text than binary... so you 
may want to keep an eye on how much you're actually saving. It won't 
hurt, but worth checking out...

HTH,

Brian