inheriting any custom property
Dick Kriesel
dick.kriesel at mail.com
Sat Sep 24 19:04:02 EDT 2005
On 9/24/05 2:56 PM, "Dan Shafer" <revdan at danshafer.com> wrote:
> Thanks. Useful stuff.
You're more than welcome, Dan.
Incidentally, since sometimes someone needs to know where an effective value
came from, a nearly identical function answers that question:
function effectiveObject pPropertyName,pPropertySetName
put the long id of the target into tObject
if pPropertySetName is empty then put "put the" && pPropertyName \
&& "of tObject into tValue" into tStatement
else put "put the" && pPropertySetName & "[" & quote & pPropertyName \
& quote & "] of tObject into tValue" into tStatement
lock messages
repeat until tObject is empty
do tStatement
if tValue is not empty then exit repeat
if word 1 of tObject is "stack" then delete word 1 to 3 of tObject
else delete word 1 to 4 of tObject
end repeat
unlock messages
return tObject
end effectiveObject
-- Dick
More information about the use-livecode
mailing list