Desc Property

A String type property. Gets or sets a descriptive text string for an object from the Applies to list.

Applies to: Document object, Library object, ServObj object, Shape object

Syntax

[[Let] descRet =] object.Desc

[Let] object.Desc = descSet

The Desc property syntax has these parts:

Part Description
object Required. An expression, that returns an object in the Applies to list.
descRet Optional. A String type variable.
descSet Required. An expression that returns a String value. The string that is set as description for the object in the Applies To.

Remarks

The Desc property contains an empty string for any new document, library, guide line or shape.

The Desc property of any of the objects can also be changed in the dialogs in ConceptDraw: "File->Document Properties->General" for a document, "File->Library->Properties" - for a library, "Format->Shape Properties->Information" - for service objects and simple shapes.

Example

This example contains an application-level script. It adds the last revision date (current date) to the Desc property of a document.

Dim cur_doc As Document         ' Declare variables

' Get the first document from the document collection of the application
Set cur_doc = thisApp.FirstDoc()

' Loop for all documents of the application
While cur_doc <> Null
    ' Write current date to the end of document description
    cur_doc.Desc = cur_doc.Desc & Chr(13) & Chr(10) & "...was updated: " & Now

    ' Get next document
    Set cur_doc = thisApp.NextDoc()
Wend

 

See Also

Author property, Company property, Subj property, Title property