| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Request a special discount on NVIDIA RTX 5000 Ada Generation GPU !, eine Pressemitteilung
|
Autor
|
Thema: Multilinienstil laden (2579 mal gelesen)
|
mkl-cad Mitglied Technischer Zeichner
Beiträge: 378 Registriert: 23.07.2003 ACAD 2002 Express Tools 1-9 Architektural Desktop Windows XP Server Windows 2003 3 GHz Rechner 1 GB RAM 80 GB Festplatte ATI FireGL V3100 2 17" Flachbildschirme
|
erstellt am: 12. Okt. 2005 12:55 <-- editieren / zitieren --> Unities abgeben:
Hallo Lisp Gemeinde, habe hier ein kleines Problem beim laden eines Multilinienstils. Bekomme es einfach nicht hin das er das Dialogfenster nicht anzeigt."" Helfen auch nicht. Bin leider etwas aus der Übung, da ich schon seit über einem Jahr nich mehr zu programieren komme: (setq Globalpfad "c:") ;ist bei mir ein anderer hier nur als Beispiel (command "mlinie" "stil" "ENTLUEFTUNG" (strcat Globalpfad "\\heluesar.mnl")) Wie kann man eigendlich feststellen ob der schon geladen ist. ? Danke für alle Antworten.
------------------ Martin Viele Grüße aus dem schönen Münsterland! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 12. Okt. 2005 13:05 <-- editieren / zitieren --> Unities abgeben: Nur für mkl-cad
|
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 12. Okt. 2005 13:26 <-- editieren / zitieren --> Unities abgeben: Nur für mkl-cad
Code:
(defun DT:MLINESTYLE-GET (NAME / MLS-DICT MLS) (if(setq MLS-DICT(dictsearch(namedobjdict) "ACAD_MLINESTYLE")) (while (and MLS-DICT (not (setq MLS (if(and(assoc 3 MLS-DICT) (=(strcase(cdr(assoc 3 MLS-DICT)))(strcase NAME)) ) (list (strcase NAME) (cdr(cadr(member(assoc 3 MLS-DICT)MLS-DICT))) ) ) ) ) ) (setq MLS-DICT (cdr(member(assoc 3 MLS-DICT)MLS-DICT))) ) ) MLS )
Mit der Funktion kannst du überprüfen, ob ein Multilinienstil existiert .. z.B. (DT:MLINESTYLE-GET "Standard")Mit dem expliziten Laden eines Stils .. .. erzeugen geht z.B. so
Code:
(defun MLINESTYLE-MAKE ( NAME ) (if(and(not(MLINESTYLE-GET NAME)) (setq MLS-DICT (cdr(cadr(member '(3 . "ACAD_MLINESTYLE") (entget (namedobjdict)) ) ) ) ) ) (progn (dictadd MLS-DICT NAME (entmakex (list '(0 . "MLINESTYLE") '(100 . "AcDbMlineStyle") (cons 2 NAME) '(70 . 0) '(3 . "") '(62 . 256) '(51 . 1.5708) '(52 . 1.5708) '(71 . 2) '(49 . 0.5) '(62 . 256) '(6 . "BYLAYER") '(49 . -0.5) '(62 . 256) '(6 . "BYLAYER") ) ) ) ) ) )
------------------ Holger Brischke CAD on demand GmbH Autodesk User Group Central Europe Individuelle Lösungen von Heute auf Morgen. AUGCE Manager Deutschland Jackpot on demand - Wir eröffnen den Spätsommer mit einer Verlosung!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mkl-cad Mitglied Technischer Zeichner
Beiträge: 378 Registriert: 23.07.2003 ACAD 2002 Express Tools 1-9 Architektural Desktop Windows XP Server Windows 2003 3 GHz Rechner 1 GB RAM 80 GB Festplatte ATI FireGL V3100 2 17" Flachbildschirme
|
erstellt am: 12. Okt. 2005 13:49 <-- editieren / zitieren --> Unities abgeben:
Danke Holger! Bist wie immer schnell und spitze!
An fuchsi: Wollte einen Multilinienstil landen, keinen Linientyp. Das bekomme ich zum Glück noch selber hin. Dennoch Danke für die Bemühungen. ------------------ Martin Viele Grüße aus dem schönen Münsterland! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 12. Okt. 2005 13:51 <-- editieren / zitieren --> Unities abgeben: Nur für mkl-cad
Zitat: Original erstellt von mkl-cad: Danke Holger! Bist wie immer schnell und spitze!
An fuchsi: Wollte einen Multilinienstil landen, keinen Linientyp. Das bekomme ich zum Glück noch selber hin. Dennoch Danke für die Bemühungen.
upps , "wer lesen kann ist im Vorteil" hab ich doch glatt überlesen ------------------ Ing. Anton Fuchs WWW.FFZELL.AT.TC Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
iTH_03 Mitglied
Beiträge: 4 Registriert: 02.11.2005
|
erstellt am: 02. Nov. 2005 10:47 <-- editieren / zitieren --> Unities abgeben: Nur für mkl-cad
MOIN MOIN!! Hab ein kleines Problem,wer cool wenn ihr mir helfen könntet!? also! ich hab mir ein Linientyp erstellt.*STRICHPUNKT,Strichpunkt! Und ich will, dass die Globale Breite 0,50 dick ist. die striche sind ja auch so dick aber nicht die Punkte!!!! versteht jemand das problem? mit um HILFE!!! MFG adrian Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mkl-cad Mitglied Technischer Zeichner
Beiträge: 378 Registriert: 23.07.2003 ACAD 2002 Express Tools 1-9 Architektural Desktop Windows XP Server Windows 2003 3 GHz Rechner 1 GB RAM 80 GB Festplatte ATI FireGL V3100 2 17" Flachbildschirme
|
erstellt am: 03. Nov. 2005 10:28 <-- editieren / zitieren --> Unities abgeben:
|
iTH_03 Mitglied
Beiträge: 4 Registriert: 02.11.2005
|
erstellt am: 04. Nov. 2005 08:52 <-- editieren / zitieren --> Unities abgeben: Nur für mkl-cad
Hi ne ne das meine ich nicht! man kann sich ja striche selber machen und wenn ich ein strichpunkt strich mir mache und der strich dick sein soll, mach er die striche dunn,also nur dünne striche Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mkl-cad Mitglied Technischer Zeichner
Beiträge: 378 Registriert: 23.07.2003 ACAD 2002 Express Tools 1-9 Architektural Desktop Windows XP Server Windows 2003 3 GHz Rechner 1 GB RAM 80 GB Festplatte ATI FireGL V3100 2 17" Flachbildschirme
|
erstellt am: 07. Nov. 2005 10:30 <-- editieren / zitieren --> Unities abgeben:
Hallo Linientypen mit einer festen Breite hab ich noch nicht gemacht. Wußte bislang nur das man dort Symbole einfügen kann. Aber Breite?. Ich mach solche Linien immer als Polylinie. Wie wäre es sonst anstatt einen Punkt mit einem sehr kurzen Strich. Sonst setzte das Beispiel des Linientyps mal hier rein. ------------------ Martin Viele Grüße aus dem schönen Münsterland! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |