Count: Integer;
The Count property returns the number of textures in the list.
This example assumes that there is the S object of the IScene3D type.
Sub Chart3D;
Var
s : IScene3D;
Count : Integer;
Begin
Count := s.DisplayedObjects.TextureManager.Count;
End Sub Chart3D;
After executing the example the Count variable will contain the number of textures.
See also: