Rs Sel Text
Last changed: -211.41.27.121

.
DeveloperRhinoScript
SummaryRhinoScript 를 사용한 모든 텍스트 개체를 선택하는 방법

다음의 RhinoScript 의 예시에서는 모든 텍스트 개체를 선택하는 법을 소개합니다.

        Sub SelText
          Dim arrObjects, strObject
          arrObjects = Rhino.AllObjects
          If IsArray(arrObjects) Then
            For Each strObject In arrObjects
              If Rhino.IsText(strObject) Then
                Rhino.SelectObject strObject
              End If
            Next
          End If
        End Sub

The following is the button macro version of the above subroutine.

        _-NoEcho 
        _-RunScript (
        arrObjects = Rhino.AllObjects
        If IsArray(arrObjects) Then
        For Each strObject In arrObjects
        If Rhino.IsText(strObject) Then Rhino.SelectObject strObject
        Next
        End If
        strObject = vbNull
        arrObjects = vbNull
        )