Support file locations

Does anyone know where the support files paths are stored in the windows registry ? (ACAD 2005, XP)
I would like to edit registry to add a custom support folder location, instead of going through Tools->Options in AutoCAD

Thanks

 

Hi,

If you have the registry skills to do this more quickly than doing it with
AutoCAD, why do you need to ask the question?

Start with HKCU\Software\Autodesk\AutoCAD\Acad-301:409 and look around
there.

Note that 301 is AutoCAD 2005 and 409 is English.

Depending on what is installed you will see other numbers.

--


Laurie Comerford
CADApps
www.cadapps.com.au

instead of going through Tools->Options in AutoCAD

 

Maybe this will help.
Support pathes are in environment variable "ACAD"
.........

(defun addSupportPath (dir pos / tmp c lst)
(setq tmp "" c -1)
(if (not (member (strcase dir)
(setq lst (mapcar 'strcase (strParse (getenv "ACAD") ";")))))
(progn
(if (not pos) (setq tmp (strcat (getenv "ACAD") ";" dir))
(mapcar '(lambda (x)
(setq tmp (if (= (setq c (1+ c)) pos)
(strcat tmp ";" dir ";" x)
(strcat tmp ";" x)
)
)
)
lst
)
)
(setenv "ACAD" tmp)
)
)
(princ)
); end function
;;
;;;==================================================================
;;; (StrParse Str Delimiter)
;;; Parses a delimited string into a list
;;;------------------------------------------------------------------
;;; Parameters:
;;; Str String to parse
;;; Delimiter Delimiter to search for
;;;------------------------------------------------------------------
;;; Returns:
;;; A list strings.
;;; ex:
;;; (setq a "Harp,Guiness,Black and Tan")
;;; (StrParse a ",")
;;; returns:
;;; ("Harp" "Guiness" "Black and Tan")
;;;------------------------------------------------------------------
;;; See Also: (StringToList)
;;;------------------------------------------------------------------
(defun strParse (Str Delimiter / SearchStr StringLen return n char)
(setq SearchStr Str)
(setq StringLen (strlen SearchStr))
(setq return '())

(while (> StringLen 0)
(setq n 1)
(setq char (substr SearchStr 1 1))
(while (and (/= char Delimiter) (/= char ""))
(setq n (1+ n))
(setq char (substr SearchStr n 1))
) ;_ end of while
(setq return (cons (substr SearchStr 1 (1- n)) return))
(setq SearchStr (substr SearchStr (1+ n) StringLen))
(setq StringLen (strlen SearchStr))
) ;_ end of while
(reverse return)
) ;_ end of defun
;;
;; Sample of use:
;;
(addSupportPath "C:\\MY_PATH\\MY_BLOCKS" nil)
;;


Bob

 

Here an example of how they're stored for LDT2005 and a profile named Lddt:
---------------------------------------
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R16.1\ACAD-308:409\Profiles\Ldd
t\General]
"ACAD"="\\\\0ds1\\data\\Cad\\Ctl\\Reference;\\\\0ds1\\data\\Cad\\Ctl\\Toolbo
x;\\\\0ds1\\data\\Cad\\Ctl\\Scripts;\\\\0ds1\\data\\Cad\\Ctl\\Pat;C:\\Progra
m Files\\Land Desktop 2005\\support;C:\\Program Files\\Land Desktop
2005\\fonts;C:\\Program Files\\Land Desktop 2005\\help;C:\\Program
Files\\Land Desktop 2005\\express;C:\\Program Files\\Land Desktop
2005\\support\\color;C:\\Program Files\\Land Desktop 2005\\;C:\\Program
Files\\Land Desktop 2005\\land;C:\\Program Files\\DotSoft\\LayerHtm;"
---------------------------------------

John

instead of going through Tools->Options in AutoCAD

 

This is what I was looking for. I needed the branch that actually stored this info.
Actually now I think I am going to configure a new profile how I want it and then copy the registry branch from the one PC to all the CAD stations. This will enable all the new installs to immediately pick up the customization when ACAD is first launched.


Thanks to all.

 

That's exactly what we do - pick and choose which keys out of the registry,
(or .arg profile), then import just those keys we want at logon/setup.

John

and then copy the registry branch from the one PC to all the CAD stations.
This will enable all the new installs to immediately pick up the
customization when ACAD is first launched.