This should do the trick for Image Events:
        
ON mouseUp
    answer file "Select an image..."
    IF it = empty THEN exit mouseUp
    put it into vFile
put "tell application " & quote & "Image Events" & quote & cr into vAS
    put "launch" & cr after vAS
    put "set vImage to open " & quote & vFile & quote & cr after vAS
    put "set vSize to the dimensions of vImage" & cr after vAS
    put "close vImage" & cr after vAS
    put "return vSize" & cr after vAS
    put "end tell" & cr after vAS
    do vAS as appleScript
    put char 2 to -2 of the result into vSize
    replace space with empty in vSize
    put item 1 of vSize into vImageWidth
    put item 2 of vSize into vImageHeight
END mouseUp



Warm regards,

Ton Kuypers
Digital Media Partners bvba
Tel. +32 (0)477 / 739 530
Fax +32 (0)14 / 71 03 04
http://www.dmp-int.com




_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to