CAD开发者社区 › 首页 ›AutoCAD开发文档› AutoCAD 2020 开发者帮助 › 查看内容

AutoCAD 2020 开发者帮助

Saved 属性（ActiveX）

2024-5-18 18:22| 发布者: admin| 查看: 63| 评论: 0|原作者: admin|来自: AutoCAD

Saved 属性（ActiveX）

指定文档是否有任何未保存的更改。

支持的平台：仅限 Windows

签名

VBA：

object.Saved

对象

类别： 文档

此属性应用于的对象。

属性值

只读：是的

类型：布尔

True：文档没有未保存的更改。
False：文档有未保存的更改。

言论

没有其他评论。

例子

VBA：

Sub Example_Saved()
    ' This example checks to see if the current drawing has been modified.
    
    If Not ThisDrawing.Saved Then
        MsgBox "Drawing has been modified! Use the Save or SaveAs method to save the drawing.", , "Saved Example"
    Else
        MsgBox "Drawing has not been modified since the last save.", , "Saved Example"
    End If
    
End Sub

可视化 LISP：

(defun c:Example_Saved()
    ;; This example checks to see if the current drawing has been modified.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))

    (if (= (vla-get-Saved doc) :vlax-false)
        (alert "Drawing has been modified! Use the Save or SaveAs method to save the drawing.")
        (alert "Drawing has not been modified since the last save.")
    )
)