Rename block name (change name) | Forumlar

Forumdan

99 kategoride 17 binden fazla konu başlatıldı bu konulara yaklaşık 90 bin cevap verildi tüm bunlar yaklaşık 109 milyon kez görüntülendi

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Ziyaretçi: 648, Üye: 2
mateus, simsek77

Detaylar »

Forumlar > AutoLISP Kodları > Rename block name (change name)

İnceleyenler : 1 ziyaretçi, 0 üye : ---

İleti	Yazar
11.07.2017 10:03 85218	alumina Editör 771 ileti Insaat Muhendisi Istanbul
Alıntı mantık85 : Secilen bloklari yenisiyle degistirir. Kod: (defun c:bn (/ dc sl ns m) (vl-load-com) (if (and (ssget '((0 . "insert"))) (setq dc (vlax-get (vlax-get-acad-object) 'activedocument) sl (vla-get-activeselectionset dc)) (setq ns (ssget ":s" '((0 . "insert"))))) (progn (vla-startundomark dc) (vlax-for m sl (vla-InsertBlock (vlax-get dc 'modelspace) (vla-get-InsertionPoint m) (vla-get-EffectiveName (vlax-ename->vla-object (ssname ns 0))) 1 1 1 (vla-get-Rotation m)) (vla-delete m)) (vla-endundomark dc) (vla-delete sl) ) ) (prin1) )

11.07.2017 11:57 85221	mantık85 Kıdemli Girişimci 29 ileti mimar izmir
Teşekkür ederim. Hemen denedim şu şekilde; ilk olarak yerine konmasını istediğim bloğu seçtim enter dedim gitmesini istediğim bloğu seçtim enter dedim. İlk seçtiğim blok gitti yeri boşaldı, ikinci blok ise aynı şekilde yerindeydi. Demek istediğim, yeri boşalmasın da biri diğerinin yerine geçsin; mesela a bloğunu seçtim sonra b bloğunu seçtim a bloğu projede bulunan bütün b bloklarının yerini alsın.. Mümkün müdür acaba? Derseniz ki insertpointler yüzünden mümkün değil, blok içinden değiştirerek aynı hale getirmek mümkün olur mu? İlginiz için çok teşekkürler

11.07.2017 12:53 85222	alumina Editör 771 ileti Insaat Muhendisi Istanbul
Alıntı mantık85 : Lispin kullanimi asagidaki videoda anlatilmistir. https://cizimokulu.com/datas/users/333661-blok-change.rar

11.07.2017 14:01 85223	mantık85 Kıdemli Girişimci 29 ileti mimar izmir
Benim bloklarımın merkezleri farklı olduğu için uzayda bir yere gidiyormuş (zoom-extend). Video ile daha rahat anladım çok teşekkür ederim.

11.07.2017 14:21 85224	alumina Editör 771 ileti Insaat Muhendisi Istanbul
Alıntı mantık85 : Bloklarin elevation lari 0 dan farkli bile olsa lispin calismasini etkilemez. Sonucta bloklar, '(x y z) nokta yapisi dikkate alinarak insert edilir.

31.05.2021 09:50 89006	mantık85 Kıdemli Girişimci 29 ileti mimar izmir
Merhabalar, Projede 300den fazla kot var hepsi aynı block ama bazıları rotate olmuş. seçtiğim blockları oldukları yerde rotate yapan lisp var mıdır?

31.05.2021 10:25 89007	Travaci Editör 2416 ileti Teknik Ressam Konstantinopol
Hepsini seçip properties ten açısını 0 yapın.

31.05.2021 10:58 89008	mantık85 Kıdemli Girişimci 29 ileti mimar izmir
çok teşekkür ederim

Önceki Sayfa

[1] > 2 <