RosettaCodeData/Task/Reflection-List-properties/Lingo/reflection-list-properties....

12 lines
193 B
Plaintext

obj = script("MyClass").new()
obj.foo = 23
obj.bar = 42
-- ...
-- show obj's property names and values
cnt = obj.count
repeat with i = 1 to cnt
put obj.getPropAt(i)&" = "&obj[i]
end repeat