...
GetPropertyAttributeList(Itempath, PropertyName: String): String;
Source Code:
| Code Block | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
try
lst := tstringlist.create;
lst.text := getpropertyattributelist(itempath, 'Name');
for ndx := 0 to lst.count - 1 do
output(lst.strings);
finally
lst.free;
end;
exit; |