Jump to content

Add Comments in Drawing Properties


Bill Tillman

Recommended Posts

I found some nice code to add text to the drawing properties. The code works fine but I need a way to enter the text for the Comments field to be a list with each new item on it's own line:

Feature #1

Feature #2

.

.

.

Feature #19

When I enter the text now it all appears on the same line. How could I build a string which would contain properly formatted line returns for this field.

(vl-load-com)
(setq acadObject (vlax-get-acad-object))
(setq acadDocument (vla-get-ActiveDocument acadObject))

  ;;Get the SummaryInfo
  (setq dProps (vlax-get-Property acadDocument 'SummaryInfo))

  ;;Edit the SummaryInfo properties
  (vlax-put-Property dProps 'Title "Test Title")
  (vlax-put-Property dProps 'Subject "Test Subject")
  (vlax-put-Property dProps 'Author "Test Author")
  (vlax-put-Property dProps 'Keywords "One Two Three")
  (vlax-put-Property dProps 'Comments "This is a comment")

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...