PPG.InspectedObjects
v4.0
This property is provided for backward compatibility purposes.
Normally it is more convenient to use PPG.Inspected.
Returns a string that is a list of the objects that are being
inspected by a Property Page. The only case where the list will
contain more than one object is if the Property Page is in
Multi-edit mode.
' Example SPDL logic. (Compare with the similar example under PPG.Inspected topic)
sub OnInit
Dim inspectedObjectNameArray
Application.LogMessage "We are inspecting " & PPG.InspectedObjects
inspectedObjectNameArray = split( PPG.InspectedObjects, "," )
for each item in inspectedObjectNameArray
'Turn the string name into an object pointer
set oNamePSet = GetValue( item )
Application.LogMessage "Inspected object " & oNamePSet & " has " & oNamePSet.Parameters.Count & " parameters"
next
end sub
|