Restore メソッド(ActiveX)

1 グループの画層プロパティの設定を復元します。

サポートされるプラットフォーム: Windows 版 AutoCAD のみ、Windows 版 AutoCAD LT ではサポートされていません

構文と要素

VBA:

object.Restore Name
object

タイプ: LayerStateManager

このメソッドが適用されるオブジェクト。

Name

アクセス: 入力のみ

タイプ: 文字列

復元する保存された画層設定の名前。

戻り値(RetVal)

戻り値はありません。

注意

Restore メソッドは、復元する画層プロパティを特定するために、保存された設定に関連付けられた Mask プロパティを使用します。

VBA:

Sub Example_RestoreLayerSettings()
    ' The following code restores color and linetype settings
    ' that were saved as "ColorLineType".
	
    Dim oLSM As AcadLayerStateManager
	
    Set oLSM = ThisDrawing.Application. _
       GetInterfaceObject("AutoCAD.AcadLayerStateManager." & Left(AcadApplication.Version, 2))

    oLSM.SetDatabase ThisDrawing.Database
    oLSM.Restore "ColorLinetype"

End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_Restore()
    ;; The following code restores color and linetype settings
    ;; that were saved as "ColorLineType."
    (setq acadObj (vlax-get-acad-object)
          doc (vla-get-ActiveDocument acadObj))
  
    ;; Access the LayerStateManager object.
    (setq oLSM (vla-GetInterfaceObject acadObj (strcat "AutoCAD.AcadLayerStateManager." (substr (getvar "ACADVER") 1 2))))

    (vla-SetDatabase oLSM (vla-get-Database doc))
  
    (vla-Restore oLSM "ColorLinetype")
)