|
Rund um AutoCAD : Gruppen zählen
Dorfy am 03.03.2010 um 09:07 Uhr (0)
auf die SchnelleCode:(defun c:cgr (/ counter grent grdict) (setq counter 0 grent (cdadr (member (3 . "ACAD_GROUP") (entget (namedobjdict)))) grdict (entget grent) ) (foreach x grdict (if (= (car x) 3) (setq counter (1+ counter)) ) ) (princ (strcat "
Gruppen: " (itoa counter) " gezählt")) (princ))------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Gruppen zählen
Dorfy am 03.03.2010 um 10:02 Uhr (0)
Zitat:Original erstellt von ChrisREM:...Bibts da einen befehl der mir das abnehmen kann?ich klick auf eine Objektgruppe und er sagt mir dann wieoft dieses Objekt in meinerzeichnung vorkommt. oder so ähnlich stell ich mir das vor Wenn es Gruppen sind, sieht es IMHO schlecht aus, bei Blöcken hättest du schon eher ne Chance.Lad mal ein kleines Beispiel hoch (dwg).------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant da ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Gruppen zählen
Dorfy am 03.03.2010 um 10:43 Uhr (0)
Vllt. solltest du mal deine Arbeitsweise überdenken, Vorteil - Nachteil von Blöcken und Gruppen...Sonst sieht es mit LT schlecht aus.------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : mline
Dorfy am 01.03.2010 um 17:52 Uhr (0)
ungetestet zum Feierabend(defun c:mll (/ Totlen n z ml vertlist e1 pt1 pt2 vertdist n) (setq Totlen 0 z -1 ml (ssget ((0 . "MLINE"))) ) (if ml (while (setq e1 (ssname ml (setq z (1+ z)))) ;(setq e1 (car (entsel "
Select MLINE: "))) (setq VertList (get_mline_cor (entget e1)) n 0 ) (repeat (- (length VertList) 1) (setq Pt1 (nth n Vertlist) Pt2 (nth (+ n 1) Vertlist) VertDist (distance Pt1 Pt2) Totlen (+ TotLen VertDist) n (1+ n) ) ) ) ) (princ (strcat "
Length of M ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Gruppieren und Gruppierung aufheben
Dorfy am 09.03.2010 um 11:16 Uhr (0)
schau mal hier------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Maße setzen
Dorfy am 09.03.2010 um 15:24 Uhr (0)
hi,dann könntest du noch mit "Spur" oder der Funktion "Temporärer Spurpunkt" arbeiten...und ggf. das Fadenkreuz drehen------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : kann man 2 Maßstäbe zusammenführen
Dorfy am 09.03.2010 um 17:49 Uhr (0)
Hi,"Maßstäbe" für Bemaßung?Schnellauswahl besser Filter nach Bemaßungsstil und ändern...oder was proggen vllt. gibt es ja schon was.------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Convertierungstool für Bemaßungsstile
Dorfy am 19.03.2010 um 09:46 Uhr (0)
hi,FAQ, schau mal hierzu den Zeilen - "Zielstyle" eingeben, Bemaßungen wählen (oder strg+A) und klick...ist zwar ohne Oberfläche aber das würde den Rahmen sprengen... vllt. gibt es im www bereits ein solches Tool------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Platzhalter in Suchen und Ersetzen
Dorfy am 18.03.2010 um 15:16 Uhr (0)
Zitat:Original erstellt von walter.f:ich habe Texte: A, B, C, D, E, F, usw.usf. Daraus soll werden A_1, B_1, C_1, D_1, E_1, F_1, usw.usf. D.h. im Ersatztext soll der jeweils gefundene Teil wieder mit übernommen werden, ich möchte ja wa anhängen.Hi,vllt. sowas auf die Schnelle ohne Fehlerhandling und Co.Code:(defun c:supre (/ elist ent prefix ss INDEX str suffix) (setq prefix (getstring "
Prefix: ")) (setq suffix (getstring "
Suffix: ")) (princ "
Texte wählen: ") (setq ss (ssget ((0 . "*TEXT")))) (setq IND ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Platzhalter in Suchen und Ersetzen
Dorfy am 18.03.2010 um 20:18 Uhr (0)
Zitat:Original erstellt von walter.f:Leider brauche ich mich jetzt nicht mehr selbst um eine Programmierung zu kümmern, das Ändern mit entmode hatte ich schon hinbekommen für einzeln anzupickende Texte... Das wäre die Gelegenheit gewesen, mal wieder was dazuzulernen...Hi,schön wenn es läuft das Fehlerhandling /ein paar Abfragen fehlen noch, du kannst dich ruhig dran versuchen...und MTexte sind mit Vorsicht zu behandeln, da gibt es noch Besonderheit die derzeit nicht berücksichtigt sind.------------------ ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Convertierungstool für Bemaßungsstile
Dorfy am 18.03.2010 um 21:35 Uhr (0)
Hi,interessant, interessant … da könnt man noch schön was mit einer Oberfläche machen… vllt. gibt es ja bei d-tools.eu schon was/ bzw. bald kannst ja mal testen ob es den Alltag erleichtertCode:(defun c:Dimstch (/ doc dimstyleslst ddimstyles tdimstyle ename ss i err) (if (and (not (equal (setq tdimstyle (getstring "
Dimstyle: ")) "")) (setq doc (vla-get-activedocument (vlax-get-acad-object))) (setq ddimstyles (vla-get-DimStyles doc)) (vlax-for each ddimstyles (setq dimstyleslst (cons (vlax-get each Name ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : mehrere Layouts aus einer Datei in einzelne Dateien abspeichern
Dorfy am 28.03.2010 um 20:21 Uhr (0)
hi,vllt. ist CADmaro.de - IMBAL was für dich...------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : mehrere Layouts aus einer Datei in einzelne Dateien abspeichern
Dorfy am 29.03.2010 um 10:02 Uhr (0)
Zitat:Original erstellt von Thomas 3D:P.S. Die Lösung von Heiko mit dem Makro ist eigentlich genau das was ich brauche. Danke Heiko!!!danke nicht mir, danke lieber CADchup bzw. den Team von CADmaro.de ------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..." (www.uni-leipzig.de/~rotheh/elefant.htm)
|
| In das Form Rund um AutoCAD wechseln |
