v1.5
Constraint オブジェクトのコレクションです。このコレクションは 0 から開始されます。
'VBScript example Dim oRoot, oNull, oSphere set oRoot = Application.ActiveProject.ActiveScene.Root set oNull = oRoot.AddNull set oSphere = oRoot.AddGeometry("Sphere","MeshSurface") oSphere.Kinematics.AddConstraint "Direction", oNull oSphere.Kinematics.AddConstraint "Direction", oNull oSphere.Kinematics.AddConstraint "Direction", oNull set oConstraints = oSphere.Kinematics.Constraints LogMessage typename(oConstraints) for each oCns in oConstraints LogMessage oCns.Name next |