オブジェクトが指定されたファミリに属している場合は True を、属していない場合は false を戻します。
oBoolean = ProjectItem.BelongsTo( Family ); |
set oRoot = Application.ActiveProject.ActiveScene.Root
set oCube = oRoot.AddGeometry( "Cube", "MeshSurface" )
set oPrimitive = oCube.ActivePrimitive
if oPrimitive.BelongsTo(siGeometryFamily) then
Application.LogMessage oCube.Name & " is a geometry object"
end if
|