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
[[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. |
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.
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 |