Series: IScene3DSeries;
The Series property determines parameters of a universal collection of scene series.
NOTE. A universal collection of scene series includes all scene objects (sphere, regular and closed surfaces, named sphere group), but currently the property should be used only to read object properties. Use special collections (interfaces) to edit them.
This example assumes that there is the S object of the IScene3D type and the IntegerEdit component.
Sub UserProc;
Var
S : IScene3D;
series: IScene3DSeries;
serie: IScene3DSerie;
key: integer;
Begin
series := S.Series;
serie := series.Item(IntegerEdit1.Value);
key := serie.Key;
If series.RemoveByKey(key) Then WinApplication.InformationBox("Object is removed");
Else WinApplication.InformationBox("Error on removal");
End If;
End Sub UserProc;
Executing the example will delete a series based on the specified key.
See also: