| |
![](https://ww3.cad.de/php/image.php?resolution=width:20050) | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
![](https://ww3.cad.de/php/image.php?resolution=width:16281) | Im Fluss: Daten konsolidiert - Prozesse synchronisiert (CIDEON, PDM, PRO.FILE, PLM, SAP, ERP, SharePoint, CAD, AutoCAD), ein Anwenderbericht
|
Autor
|
Thema: Schraffuren Farbe zuweisen (466 mal gelesen)
|
K.D.H. Mitglied Konstrukteur Holz
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für K.D.H.](/foren/ubb/pmimages/gbu.gif) Beiträge: 10 Registriert: 09.02.2007
|
erstellt am: 06. Sep. 2007 08:52 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo Zusammen, kann ich über eine Systemvariable, der Schraffur eine Feste Farbe zuweisen, egal auf welchem Layerr ich die Schraffur einfüge? Habe werder in der Hilfe noch hier im Forum etwas zu diesem Thema gefunden, Wer kann mir da helfen? Danke im Vorraus Peter "Der Glaube versetzt Berge, der Zweifel erklettert sie." Friedrich Georg Jünger ------------------ Fa. K.D.H. Peter Huber Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Dig15 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. für Markscheidewesen und Geodäsie
![](/foren/avatars/Dig15.gif)
![Schreiben Sie einen Gästebucheintrag für Dig15](/foren/ubb/pmimages/gbu.gif) Beiträge: 5833 Registriert: 27.02.2003 DWG TrueView 2014
|
erstellt am: 06. Sep. 2007 08:57 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für K.D.H.
|
CADmium Moderator Maschinenbaukonstrukteur
![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif) ![](/foren/ubb/Admin4.gif) ![](/foren/ubb/Admin5.gif) ![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif)
![](/foren/avatars/CADmium.gif)
![Schreiben Sie einen Gästebucheintrag für CADmium](/foren/ubb/pmimages/gbu.gif) Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 06. Sep. 2007 08:57 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für K.D.H.
die SYSvar CECOLOR setzt die verwendete Farbe für neue Objekte .. speziell für Schraffur gibt's nichts. Per Makro kann vor dem Schraffurbefehl natürlich cecolor gesetzt werden .. Eleganter läßt sich sowas mit einer Reaktorprogrammierung lösen. Beispiele dafür (Bemassung) sind im Forum zu finden. Eine Nachträgliche Farbzuweisung ist über Schnellauswahl und Eigenschaftsfenster möglich. Für Schraffuren in (verschachtelten ) Blöcken ist eine entsprechende Programmierung sinnvoll. ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Kramer24 Ehrenmitglied V.I.P. h.c. Architekt
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für Kramer24](/foren/ubb/pmimages/gbu.gif) Beiträge: 5896 Registriert: 09.11.2001 Acad Architecture 2023 WIN 10
|
erstellt am: 06. Sep. 2007 08:58 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für K.D.H.
|
K.D.H. Mitglied Konstrukteur Holz
![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für K.D.H.](/foren/ubb/pmimages/gbu.gif) Beiträge: 10 Registriert: 09.02.2007
|
erstellt am: 06. Sep. 2007 09:11 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hallo Thomas, Danke für den Hinweis, habe nach der Reaktorprogrammierung gesucht, einige Hinweise auch gefunden, kenne mich jedoch zu wenig aus, um diese selber durchzuführen, ausserdem weis ich nicht wo ich diese Programmierung hinterlegen muss! Sorry bin anfänger im Autocad und habe nicht sehr viel Kenntnisse! Jedere Anfang ist schwer aber durchgehn muss man alleine, danke für deine Hilfe!
Peter ------------------ Fa. K.D.H. Peter Huber Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif) ![](/foren/ubb/Admin4.gif) ![](/foren/ubb/Admin5.gif) ![](/foren/ubb/Admin1.gif) ![](/foren/ubb/Admin2.gif) ![](/foren/ubb/Admin3.gif)
![](/foren/avatars/CADmium.gif)
![Schreiben Sie einen Gästebucheintrag für CADmium](/foren/ubb/pmimages/gbu.gif) Beiträge: 13527 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 06. Sep. 2007 09:42 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für K.D.H.
nu ja .. ich hab mal Holgers Programm etwas modifiziert Code:
(defun pre_hatch (reatyp befname / ) (cond ((wcmatch (car befname) "DIM*") (setq *oldC* (getvar "CECOLOR")) (setvar "CECOLOR" "1") ) ) ) (defun after_hatch (reatyp befname / ) (cond ((and (wcmatch (strcase(car befname)) "*HATCH*,*SCHRAFF*") *oldC* ) (setvar "CECOLOR" *oldC*) (setq *oldC* nil) ) ) ) (defun reaload () (if (not *DEFUN_HATCHCOLOR*) (progn (setq *DEFUN_HATCHCOLOR* (VLR-Command-Reactor "*DEFUN_HATCHCOLOR*" '((:vlr-commandEnded . after_hatch) (:vlr-commandwillstart . pre_hatch) ) ) ) (princ "\nFarbschalter Schraffur aktiviert") ) ) ) (reaload)
hab ich jetzt aber nicht weiter getestet... wie's zu laden geht steht hier und wenn du dich in Lisp einarbeiten wills, ist diesesKochbuch vielleicht was für dich ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |