Rekomendowane odpowiedzi

Opublikowano (edytowane)

Nie ma problemu. Zainteresuj się CADPL-Pack'iem: http://forum.cad.pl/cadpl-pack-v1-lsp-t78161.html

Potem, wczytaj go, oraz poniższą funkcję:

(defun -MakeLayout (Start End Pref / i n l)
  (setq i Start
        l (layoutlist)
  )
  (while
    (< i End)
    (progn
      (setq n (strcat Pref (itoa i)))
      (if
        (not (member n l))
        (vla-Add (cd:ACX_Layouts) n)
      )
      (setq i (1+ i) l (cons n l))
    )
  )
)

Ma ona trzy argumenty: Start - to liczba całkowita od jakiej zaczyna się licznik, End - to koniec, Pref to łańcuch tekstowy, nazwy układu.

Wywołujesz ją w ten sposób:

(-MakeLayout 1 201 "Szkic")

i po chwili masz te Layouty...

kojacek (https://kojacek.wordpress.com)

Edytowane przez kojacek

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Jedynie zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się poniżej.

Zaloguj się