v6.0
現在のキャラクタ キーセットを含む CustomProperty を戻します（存在する場合）。 キャラクタ キー セットは、カスタム プロパティとして実装されます。
oReturn = GetCurrentCharacterKeySet(); |
現在のキャラクタ キーセットがない場合は、CustomProperty または Nothing を戻します。
Sub DumpCharKeySet Dim oCharKeySet Set oCharKeySet = GetCurrentCharacterKeySet If ( oCharKeySet Is Nothing ) Then LogMessage "No current Character Key Set..." Else LogMessage "Current Character Key Set : " & oCharKeySet End If End Sub SetCurrentCharacterKeySet "" DumpCharKeySet CreateCharacterKeySet ActiveSceneRoot, "BodyKeySet" DumpCharKeySet CreateSubCharacterKeySet ,, "HandKeySet" DumpCharKeySet |