Simpatie.ro - matrimoniale
lisp2arx
Visual Programming for AutoLisp Mathématiques en programmation Lisp.. doc2cpp,doc2lsp, sld2lsp, bmp2dcl, free__GifCcapture for all-CAD'platforms.. 		Nou pe simpatie:
Aandreea Profile
Femeie
24 ani
Bucuresti
cauta Barbat
25 - 52 ani
lisp2arxReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
lisp2arx / Listof AutoLisp.100 /

vla-AutoLispR14-List all Layouts Name for script

 Pagini: 1 Moderat de zauchan
#1
zauchan
Moderator
Postari: 180
You Get all LayOutName/s


(setq MB_CASE_UPPER_SIMPLE 4)
(setq MB_CASE_LOWER_SIMPLE 5)
(defun dfn_layout_inf(ucwords / $rr $db doi clj nam dot lpt aro doi) 
     (setq
     $db (dictsearch (namedobjdict  "ACAD_LAYOUT"
     doi nil) (progn (setq
     lpt nil) (while (setq
     clj (assoc 3 $db) (if clj (setq
     lpt (append lpt (list (cdr clj)) (setq
     $db (cdr (member clj $db))) (setq
     doi nil) (setq
     dot (if_int ucwords 0) (if (=  dot 4) (foreach aro clj (setq
     doi (append doi (list (strcase aro) (if (=  dot 5) (foreach aro clj (setq
     doi (append doi (list (strcase aro T))) (setq
     $rr (list lpt doi)   
$rr)


vla-AutoLispR14-List all Layouts Name for script - You Get all LayOutName/s (setq - Listof AutoLisp.100
vla-AutoLispR14-List all Layouts Name for script – poza de zauchan, in Listof AutoLisp.100 · 29.2KB


_______________________________________
psw: cea de la wjndowsXP gigabyte..
 
   

Topicuri similare

Pagini: 1  
Mergi la