blocks replacen

[designer68]

kan ik ook blocks aanklikken en op die manier vervangen door een ander block?
als ik dat nu doe gaat hij naar de block editor en als ik het zou doorvoeren verandert hij het door de hele tekening heen.

mooiste zou zijn dat ik een block kan aanklikken en hij dan automatisch verandert in een block die ik heb opgegeven.

een soort modify functie bijv.
===========================================================

verder heb ik wat unreconciled new layers in mijn dwg waar ik niet makkelijk van af kom

[hulpje]

Voor het vervangen van blocken is er een commando.
Dit commando heet BLOCKREPLACE.

Wijst zich bijna vanzelf!

Succes!

Richard

[EddyBeerke]

Voor elk probleem kunje het beste een nieuw topic starten houd het overzichtelijker.
Het layer probleem.
Als je de layermanager start heeft acad een filter gemaakt. Klik daar op, selecteer alle layers en klik rechts.
Kies reconcile.

[Leon]

Blockreplace doet niet wat er gevraagd werd. Want die vervangt net als de Blockeditor alle inserts van het block, en als je niet goed uitkijkt gooit die ook nog je oude block weg, ben je helemaal in de aap gelogeerd.
Als het zou kunnen in AutoCAD dan kon je de naam van een insert wijzigen in de properties manager en dat kan niet.

Je kunt in de Block editor een block saven onder een andere naam, dat komt nog het meest in de buurt maar is ook niet wat er gevraagd wordt.

In Flash kan het bijvoorbeeld wel! daar kun je een insert van een block vervangen door een andere (en dat heet dan replace) en dat is ongelofelijk handig en mis ik echt in AutoCAD. Ik heb het al een paar keer op de Wishlist van AutoDESK geplaatst maar het zit er volgens mij nog steeds niet in.

[EddyBeerke]

't Is natuurlijk niet makkelijk omdat je met meer dan alleen een blockname temaken hebt.
Zitten er attributen aan het block?
Welke units zijn gebruikt en welke schaal, rotatie en noem maar op.
Met een lisp de propertys opvragen, in het nieuwe block zetten en het oude verwijderen.

[Ropa]

Probeer deze maar eens. Deze gebruik ik altijd. Opstarten met _vbarun.
Kan je dan onder een button zetten.

[jo-king]

zelf gebruik ik hier een LISP voor....


Geen idee waar ik die ooit gevonden heb, dus sorry als ik geen credit geef aan de maker...

Even inladen & het commando starten met REPLACE

Code Selecteer Uitklappen


;;
;;
;;
;;
;; ========================================================================
;;; Replace selected blocks with another block
;; ========================================================================
;;
;;
;;


(defun c:REPLACE (/ ENT1 BL1 NWNM OLD ODNM)
 (prompt "Select blocks to replace: ")
 (and
   (setq ENT1 (ssget "_:L"))
   (setq NEWBL (car (entsel "\nSelect block to replace with: ")))
   (setq NEWBL (cdr (assoc 2 (entget NEWBL))))
;(setq NEWBL (getstring "\nEnter new block name: "))
   (not (command "insert" NEWBL nil))
   (setq N (sslength ENT1))
   (setq I 0)
   (repeat N
     (setq BL1 (entget (ssname ENT1 I)))
     (setq NWNM (cons 2 NEWBL))
     (setq OLD (assoc 2 BL1))
     (setq ODNM (cdr OLD))
     (entmod (subst NWNM OLD BL1))
     (setq I (1+ I))
   ) ;_ repeat
 ) ;_ and
 (prin1)
) ;_ defun