Custom properties

[supertxull]

I would like to create a lisp file to add custom properties to my drawings (also Sheet Set properties if it's possible).

Where can I find information about it?

I would need to create a property name and its value.

Thank you in advance for your help.

[dexus]

Below is the code I use to set custom properties:

 

; Custom dwg properties functions
(defun getCustomDwgProp (key / summaryInfo val)
	(setq summaryInfo (vla-get-summaryInfo (vla-get-activeDocument (vlax-get-acad-object))))
	(if (vl-catch-all-error-p (vl-catch-all-apply 'vla-getCustomByKey (list summaryInfo key 'val)))
		(setq val nil)
	)
	val
)
(defun setCustomDwgProp (key value / summaryInfo)
	(setq summaryInfo (vla-get-summaryInfo (vla-get-activeDocument (vlax-get-acad-object))))
	(if (getCustomDwgProp key)
		(vla-setCustomByKey summaryInfo key value)
		(vla-addCustomInfo summaryInfo key value)
	)
)

 

Edited May 19, 2022 by dexus

[exceed]

(vl-load-com)(vlax-dump-object (vlax-get-property (vla-get-activedocument (vlax-get-acad-object)) 'Summaryinfo) t)

 

 

Copy this and Paste to the command prompt. 

you can modify the upper values with get-property/put-property (if that property is not read only) 

or you can use method in the methods supported list.

 

Edited May 19, 2022 by exceed

[supertxull]

Thanks! I am going to check it.

[_Flawgic]

is there anyway to add a cumulative GPM count? i do sprinklers and it would help tremendously for zoning. i want to be able to select a group of heads with different gpm values and see their total gallon count similar to cumulative area for hatch

[BIGAL]

What does this have to do with custom properties ?

 

Please Admin move to a new lisp request. 

 

For _Flawgic post a sample dwg.

[hosneyalaa]

4 hours ago, BIGAL said:

What does this have to do with custom properties ?

TEST

 

Command: DWGPROPS

 

[BIGAL]

Sorry  _Flawgic  post, is not relevant to Custom properties question.

 

Admin may fix.

Edited January 13 by BIGAL