ItemCount
(Available in 00 TS Tools(Base) - TS_Tools_PointerSafe)
Purpose
Get the 'ItemCount'
Syntax
? oPointerSafe:ItemCount
Description
Get the 'ItemCount', this value is provided for the application programmer and can be used to indicate the actual number of stored data items. The methods 'ItemNext()', 'ItemPrevious()', 'ItemFirst()' and 'ItemLast()' can be used to iterate the 'array' of data items.
Returns
dwItemCount
Example
METHOD UsingThePointerSafe( ) CLASS MyObject
LOCAL oPointerSafe AS TS_PointerSafe
LOCAL pItem AS PTR
oPointerSafe:=TS_PointerSafe{ SELF, 10, _SIZEOF( _WinGUID ) }
oPointerSafe:ItemAdd( TS_GUID_IDispatch( ) )
oPointerSafe:ItemAdd( TS_GUID_IUnknown( ) )
oPointerSafe:ItemAdd( TS_GUID_ITypeInfo( ) )
IF oPointerSafe:ItemLocate( TS_GUID_ITypeInfo( ) )
oPointerSafe:ItemDel( oPointerSafe:ItemIndex )
END
IF !oPointerSafe:ItemLocate( TS_GUID_ITypeInfo( ) )
oPointerSafe:ItemAdd( oPointerSafe:ItemIndex )
END
oPointerSafe:ItemFirst( )
WHILE pItem<>NULL_PTR
IF pItem<>NULL_PTR
SELF:UseItem( pItem )
END
pItem:=oPointerSafe:ItemNext(