| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| CAD-Automatisierung: Effizienzsteigerung durch smarte Methoden, ein Webinar am 11.10.2024
|
Autor
|
Thema: Schraffur (846 mal gelesen)
|
schlotti Mitglied
Beiträge: 390 Registriert: 15.01.2004
|
erstellt am: 28. Aug. 2006 15:29 <-- editieren / zitieren --> Unities abgeben:
Hallo mit dem globalen ltfaktor kann man ja den Faktor (Variable) für alle enthaltenen Linien einstellen. Nun meine Frage. Kann man so was auch bei Schraffuren ermöglichen. Also den Skalierfaktor global anpassen. Hintergrund ist der das eine Zeichnung in 2 verschieden Maßstäben ausgeplottet wird. Die Möglichkeit 2 verschiedene Layer zu verwenden ist mir bekannt. Oder gibt es vielleicht andere Tipps. ------------------ MfG Schlotti Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tunnelbauer Ehrenmitglied V.I.P. h.c. Bauingenieur
Beiträge: 7085 Registriert: 13.01.2004 Sie nannten ihn google.
|
erstellt am: 28. Aug. 2006 15:31 <-- editieren / zitieren --> Unities abgeben: Nur für schlotti
|
Proxy Ehrenmitglied Stateless-DHCP v6-Paketfragmentierer
Beiträge: 1629 Registriert: 13.11.2003 Tastaturen, Mäuse, Pladden, Monitore, ...
|
erstellt am: 28. Aug. 2006 22:56 <-- editieren / zitieren --> Unities abgeben: Nur für schlotti
Würde es dir reichen, die Schraffurskalierung einfach global für alle Schraffuren zu multiplizieren, z.B. alle Schraffurskalierungen x einen bestimmten Wert ? Als Beispiel ein Lisp dass es abhänig von dem aktuellen Bemassungstillmaßstab anpasst. Code:
(defun c:dimhatch (/ ss n dimscale) (if (setq ss (ssget ":L" '((0 . "HATCH")))) (progn (setq n 0) (if (zerop (setq dimscale (getvar "dimscale"))) (setq dimscale 1.0) ) (repeat (sslength ss) (vl-cmdf "._hatchedit" (ssname ss n) "_prop" "" dimscale "" ) (setq n (1+ n)) ) ) ) (princ) )
Vielleicht hat ein Profi, Bock (vla-put-patternscale objhatch (* X (vla-get-patternscale objhatch))) zu coden ... oder bereits fertig. Lustig wäre es natürlich in Abhänigkeit des Ansichtsfenstersfaktors im Papierbreich und global für den ganzen Modellbereich.
Ansatz:
Code:
(defun c:hsu () (c:hatchscaleup)) (defun c:HatchScaleUp (/ objhatch patterntype) (setq objHatch (vlax-ename->vla-object (car (entsel))) patterntype (vla-get-patterntype objHatch) ) (if (or (= acHatchPatternTypePreDefined patterntype) (= acHatchPatternTypeCustomDefined patterntype) ) (vla-put-patternscale objhatch (* 1.5 (vla-get-patternscale objhatch))) (vla-put-patternspace objhatch (* 1.5 (vla-get-patternspace objhatch))) ) (vla-update objhatch) )(defun c:hsd () (c:hatchscaledown)) (defun c:HatchScaleDown (/ objhatch patterntype) (setq objHatch (vlax-ename->vla-object (car (entsel))) patterntype (vla-get-patterntype objHatch) ) (if (or (= acHatchPatternTypePreDefined patterntype) (= acHatchPatternTypeCustomDefined patterntype) ) (vla-put-patternscale objhatch (* 0.75 (vla-get-patternscale objhatch))) (vla-put-patternspace objhatch (* 0.75 (vla-get-patternspace objhatch))) ) (vla-update objhatch) )
------------------ MfG Proxy Bitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung gestellt. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
schlotti Mitglied
Beiträge: 390 Registriert: 15.01.2004
|
erstellt am: 30. Aug. 2006 07:24 <-- editieren / zitieren --> Unities abgeben:
|
criecky Mitglied MENSCH
Beiträge: 251 Registriert: 13.01.2004 ACAD 2011- 2017 www.cbyte.eu
|
erstellt am: 04. Sep. 2006 15:13 <-- editieren / zitieren --> Unities abgeben: Nur für schlotti
Hi, habe da mal für acad 2004-2006 eine arx "gebastelt". enthält aber keine gross fehlerprüfung.... also anwendung auf eigene gefahr. cruss criecky <A HREF="http://www.cbyte.de
------------------ ------------------ Softlan</A> macht das Netzwerk weich! [Diese Nachricht wurde von criecky am 04. Sep. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |