Author Topic: Loading manuall a multiline style  (Read 2458 times)

0 Members and 1 Guest are viewing this topic.

iliekater

  • Guest
Loading manuall a multiline style
« on: October 28, 2007, 06:47:28 AM »
Is there a way to search if a aspecific multiline style exists and if not load it manually ? I tried -MLSTYLE , but there isn't such a command ; I tried FILEDIA = 0 , but the MLSTYLE dialog box still appears ; I tried TBLSEARCH , but it can't search for multiline styles ... I also tried ULTREX but once again nothing !
So is there a  way to do it with Lisp code ?

Joe Burke

  • Guest
Re: Loading manuall a multiline style
« Reply #1 on: October 28, 2007, 07:22:29 AM »
Mline styles are stored in a dictionary named ACAD_MLINESTYLE.

Maybe this will help.

Command: (setq lst (dictsearch (namedobjdict) "ACAD_MLINESTYLE"))
((-1 . <Entity name: 7efc0a80>) (0 . "DICTIONARY") (5 . "368") (102 .
"{ACAD_REACTORS") (330 . <Entity name: 7efbec48>) (102 . "}") (330 . <Entity
name: 7efbec48>) (100 . "AcDbDictionary") (280 . 0) (281 . 1) (3 . "STANDARD")
(350 . <Entity name: 7efc0aa8>) (3 . "TEST") (350 . <Entity name: 7efc8ab8>))

Command: (setq alst (vl-remove-if-not '(lambda (x) (= 3 (car x))) lst))
((3 . "STANDARD") (3 . "TEST"))

Command: (setq namelst (mapcar 'cdr alst))
("STANDARD" "TEST")