Returns the object's geometry type as a String.
set oRoot = Application.ActiveProject.ActiveScene.Root set oObject = oRoot.AddGeometry( "Cube", "MeshSurface" ) set oGeometry = oObject.obj set oGeometry1D = oGeometry.Geometry1D logmessage "Object type = " & oGeometry1D.Type |