Layer-Obje Seçimi ve Kapatma | Forumlar

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Ziyaretçi: 687, Üye: 2
ercanteke, mttlp

Detaylar »

Forumlar > AutoLISP > Layer-Obje Seçimi ve Kapatma

Bu başlığı inceleyenler : 1 ziyaretçi, 0 üye : ---

İleti	Yazar
08.12.2014 08:15 79486	neden09 Uzman 56 ileti elektrik teknikeri aydın
Merhaba Arkadaşlar; Forumda arattım ama bulamadım, sizden bir ricam olacak. Projede seçmiş olduğum objeler haricindeki tüm çizimlerin kapanmasını sağlayacak bir lispe ihtiyacım var. Not: Autocad'de propertiesde bunu yapmak mümkün ancak iş yerinde bricscad kullanmak zorunda olduğum için bunu yapamıyorum. Çok zamanımı alan bu iş ile ilgili yardımcı olabilirseniz sevinirim. Teşekkürler...

08.12.2014 08:41 79487	alumina Editör 769 ileti Insaat Muhendisi Istanbul
Iyi günlerde kullanin.. Kod: (defun c:is () (while (null (setq n (ssget)))) (vl-cmdf "._isolateobjects" n "") (princ)) Kod: (defun c:uis () (vl-cmdf "._unisolateobjects") (princ))

08.12.2014 09:27 79488	neden09 Uzman 56 ileti elektrik teknikeri aydın
Öncelikle çok teşekkür ederim. Lisplerin yüklemesini yaptım. Obje seçimi yapıyor ancak layerleri kapatmıyor. Yardımcı olabilir misin?

08.12.2014 09:54 79497	alumina Editör 769 ileti Insaat Muhendisi Istanbul
Objelerin kapanmasini istiyorum dedin kapattım. Simdi de layerler diyorsun. Karar ver ama.

08.12.2014 10:12 79498	neden09 Uzman 56 ileti elektrik teknikeri aydın
Yanlış aktardım sanırım... seçmiş olduğum bloklu semboller ve layerlar haricindeki projede yer alan tüm çizimlerin kapanmasını istiyorum. (seçili layerlar haricindeki tüm layerların kapanması da işimi görebilirim sanırım)

08.12.2014 11:18 79499	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
alumina bu lispte kapanma değilde sanki seçtigin hariç hepsini siliyo gibi bi durum var geri nasıl açılıyor kapanıyorsa ?

08.12.2014 11:25 79500	alumina Editör 769 ileti Insaat Muhendisi Istanbul
ikinci lispi kullan. ilk lisp objeleri isolate eder. ikinci lisp isole edilmiş objeleri acar.

09.12.2014 00:58 79507	alumina Editör 769 ileti Insaat Muhendisi Istanbul
Arkadaslar; Programdaki kucuk bir ayrintiya dikkatinizi cekmek istiyorum. Bildiginiz gibi aktif layer freeze edilemez. O anki aktif layer freeze edilmeyecek layerlerden biri degilse once aktif layer freeze edilmeyecek layerlerin birine (alfabetik olarak ilk siradaki) aliniyor, sonra diger layerler freeze ediliyor. Lisp yazmayi ögrenen arkadaslardan talep gelirse ayni kodun autolisp versiyonunu da yayinlarim. Kod: (defun c:alumina () (vl-load-com) (while (null (setq n (ssget)))) (setq ls '() i 0) (repeat (sslength n) (if (null (member (vla-get-layer (vlax-ename->vla-object (ssname n i))) ls)) (setq ls (cons (vla-get-layer (vlax-ename->vla-object (ssname n i))) ls) i (1+ i) ls (acad_strlsort ls)))) (setq lt (vla-get-layers (vla-get-activedocument (vlax-get-acad-object)))) (if (null (member (vla-get-name (vla-get-activelayer (vla-get-activedocument (vlax-get-acad-object)))) ls)) (vla-put-activelayer (vla-get-activedocument (vlax-get-acad-object)) (vla-item lt (nth 0 ls)))) (vlax-for l lt (if (null (member (vla-get-name l) ls)) (vla-put-freeze l 1))) (princ))

07.02.2020 12:00 87957	halilozcakir Üstad 608 ileti Mekanik Teknik Ressam /Teniker İstanbul
Merhaba , benimde layerlar ile alakalı bir lisp talebim olacak eğer mümkünse ; Belirlediğim objeden seçerek yada isim yazarak yada layer isminden seçerek , bu layerı tüm layoutlarda açık yada kapalı konumunu ayarlatmak. böyle bir lisp mümkün mü teşekkürler.

> 1 <