Display an objects properties in Director

 

Compatibilities:

This item has not yet been rated

Shows all props for an object showProps(whichObj), where whichObj is the object in question

--Copyright © 1997 -1998 Metaforce Interactive. --http://www.metaforce.com on showProps whichObj   set numProps to count(whichObj)   put numProps && "properties"   repeat with x = 1 to numProps     set thisProp to getPropAt(whichObj,x)     set thisValue to getAProp(whichObj,thisProp)     put "  " & thisProp & " = " & thisValue   end repeat end