Platforms to show: All Mac Windows Linux Cross-Platform
WIAPropertyMBS class
The WIAPropertyMBS class contains data about a single property in a property set. This data is the property ID and type tag, and the optional string name that may be associated with the property.
Example
Sub ListProperties(it as WIAItemMBS , plist as listbox) // enumerate properties into a given listbox // clear list PList.DeleteAllRows // get properties dim p as WIAPropertyStorageMBS = it.PropertyStorage if p<>Nil then dim e as WIAPropertyEnumeratorMBS = p.Enumerate if e<>nil then dim ps as WIAPropertyMBS = e.NextItem while ps<>Nil // read the property value dim v as Variant = p.Read(ps) // get some identifier string for the listbox, name or id dim k as string = ps.Name if len(k)=0 then k = str(ps.ID) end if PList.AddRow k if v.Type = v.TypeObject then if v isa WIAGUIDMBS then dim g as WIAGUIDMBS = v PList.Cell(PList.LastIndex,1 )=g.DisplayString else PList.Cell(PList.LastIndex,1 )="? some object" // should never happen end if else PList.Cell(PList.LastIndex,1 )=v.StringValue end if ps = e.NextItem wend end if end if End Sub
3 properties
property ID as Integer
property Name as String
property Type as Integer
This class has no sub classes.
Some methods using this class:
Some examples using this class:
The items on this page are in the following plugins: MBS Win Plugin .
WIAPropertyEnumeratorMBS
-
WIAPropertyStorageMBS