| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Layerstates (2186 mal gelesen)
|
T. Bürger Mitglied Technischer Angestellter
Beiträge: 201 Registriert: 30.01.2001 AMD Athlon XP2000+ ATI Fire GL 8800 Maxtor 4R060J0(60GB) Windows XP-Pro. SP1 Novell 4.1 1024MB Arbeitsspeicher AutoCAD2004 Expresstools LayerManager-Pro
|
erstellt am: 24. Sep. 2003 16:06 <-- editieren / zitieren --> Unities abgeben:
Hallo Ihr Wissenden, wie bekomme ich die Namen von gespeicherten Layerstände in eine Liste. Ich meine dabei nicht die aus dem Layermanager der bei den Expresstools dabei ist, sondern den von Autocad selber (seit V.2002, glaube ich). Ich möchte mit dieser Liste Überprüfen ob es einen Namen schon giebt oder nicht. Gesucht habe ich natürlich auch schon, aber nur was gefunden für den LM aus den Expresstools.
------------------ Grüße T. Bürger Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marvin101010 Mitglied ingenieur der architektur ohne diplom, bauzeichner ohne lehre, cad-admin ohne wissen :-)
Beiträge: 562 Registriert: 22.01.2003 Pentium 4 Windows XP Autocad 2002 Autocad 2002LT + Extender ADT 3.3 ArchiCAD
|
erstellt am: 24. Sep. 2003 16:33 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
|
benwisch Mitglied Bautechniker, CAD-Konstrukteur
Beiträge: 375 Registriert: 01.02.2001
|
erstellt am: 24. Sep. 2003 17:45 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
@marvin ich glaube er meint den "status speichern" "status wiederherstellen" im layerdialog, mit denen man die jeweiligen layerzustände speichern kann... @T. Bürger wenn ich dich richtig verstanden habe, dann... ...kannst du das aus der ACAD Dictionary auslesen Code:
(entget (vlax-vla-object->ename (vla-getextensiondictionary (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))) ) ;_ end vla-GetExtensionDictionary ) ;_ end vlax-vla-object->ename )
ich habe bei mir einfach 2 func's gebaut, die nahezu identisch sind. => ACAD_LAYERFILTERS => ACAD_LAYERSTATES Namen der gespeicherten Layerstände
Code:
(defun bw_ACAD_Layerstates (/ NameLst chk) (if (setq chk (member (cons 3 "ACAD_LAYERSTATES") (entget (vlax-vla-object->ename (vla-getextensiondictionary (vla-get-layers (vla-get-activedocument (vlax-get-acad-object))) ;_ end vla-get-layers ) ;_ end vla-GetExtensionDictionary ) ;_ end vlax-vla-object->ename ) ;_ end entget ) ;_ end member ) ;_ end setq (progn (foreach task (entget (cdr (assoc 360 chk))) (if (= (car task) 3) (setq NameLst (cons (cdr task) NameLst)) ) ;_ end if ) ;_ end foreach (reverse NameLst) ) ;_ end progn ) ;_ end if ) ;_ end defun
(bw_ACAD_LayerStates) => ("name1" "name2" "name3")Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 25. Sep. 2003 08:11 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
|
T. Bürger Mitglied Technischer Angestellter
Beiträge: 201 Registriert: 30.01.2001 AMD Athlon XP2000+ ATI Fire GL 8800 Maxtor 4R060J0(60GB) Windows XP-Pro. SP1 Novell 4.1 1024MB Arbeitsspeicher AutoCAD2004 Expresstools LayerManager-Pro
|
erstellt am: 25. Sep. 2003 09:32 <-- editieren / zitieren --> Unities abgeben:
Hallo Ihr, danke erst einmal für die schnellen Antworten. @marvin101010, wie benwisch ja schon angemerkt hatte wollte ich nicht die Layerstände aus dem Layermanager der Expresstools sondern aus der Layersteuerung von Autocad. @benwisch, volle Punktzahl..., ich bin begeistert! Es scheint wohl wirklich an der Zeit zu sein sich mit der Geschichte über vla-* und vlax-* auseinander zu setzen. @CADwiesel, interessantes Tool, wenn es den bei mir laufen würde (2004). Es kommt leider nur eine Fehlermeldung nach dem aufpoppen der Dosbox und dann war es das auch schon, leider. ------------------ Grüße T. Bürger Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 25. Sep. 2003 11:14 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
|
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: 25. Sep. 2003 12:43 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
Wenn Sie nur wissen wollen ob ein Layer existiert geht das auch ohne vla-* und vlax-* . (setq abfrage (tblsearch "layer" "Layername")) Gibt nil zurück wenn nicht vorhanden und sonst eine Liste mit den Layereigenschaften Martin
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
T. Bürger Mitglied Technischer Angestellter
Beiträge: 201 Registriert: 30.01.2001 AMD Athlon XP2000+ ATI Fire GL 8800 Maxtor 4R060J0(60GB) Windows XP-Pro. SP1 Novell 4.1 1024MB Arbeitsspeicher AutoCAD2004 Expresstools LayerManager-Pro
|
erstellt am: 25. Sep. 2003 13:32 <-- editieren / zitieren --> Unities abgeben:
@CADwiesel, joooo..., die Tables.vlx in der ZIP-Datei funktioniert. @mkl-cad, es geht nicht darum ob ein Layer vorhanden ist, sondern ob der Name eins gespeicherten Layerstandes (welche Layer ein, aus, gefroren, getaut, gesperrt oder entsperrt sind) vorhanden ist.
------------------ Grüße T. Bürger Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
SebZ Mitglied Bauingenieur Tiefbau
Beiträge: 189 Registriert: 17.10.2004 AutoCAD 2010 Civil 3D DACH WinXP Professional 2002 SP3 MS Office 2007 Intel Core2Duo 2.80 GHz, 3.00 GB RAM
|
erstellt am: 22. Aug. 2007 12:28 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
hallo - ich hole mal dieses alte Thema wieder nach oben. Ich hatte mich nur eben gewundert, dass die Zeichnungsanalyse bei einer Zeichnung (dwg2000) die vorhandenen 4 Layerstates nicht bemerkt hat ("- KEIN EINTRAG- " unter "Layerstände"). Zur Vermeidung von Missverständnissen: die LS' habe ich mit der Layersteuerung und nicht mit den ET vereinbart. Hab ich da was vergessen? [/EDIT] PS: die Textfelder der Einträge sind auf 20 Zeichen beschränkt (habe gerade die Blöcke abgefragt, aber ich glaube diese Beschränkung gilt für alle anderen Kategorien auch). @CADWiesel: wenn du mal eines Tages ein Update in Erwägung ziehen solltest, könntest du dieses Feld evtl. deutlich vergrößern? wär schon nicht ungünstig... Ansonsten will ich aber keinen falschen Eindruck aufkommen lassen. Das Tool leistet hervorragende Hilfe. [/edit] ------------------ Gruß SebZ [Diese Nachricht wurde von SebZ am 22. Aug. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 23. Aug. 2007 10:01 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
Hai kann ich leider nicht nachvollziehen. Kannst du mir mal die Zeichnung zur Verfügung stellen? - Kannst ja die Geometrie löschen Die Zeichenfolge ist begrenzt um nicht in det Tabellarischen Ansicht zu verrutschen. Aber ich sollte in der Tat mal was auf Excel ausgabeformat machen. außerdem sind ja auch einige weitere Objekte hinzugekommen, die Tables noch nicht berücksichtigt - muss ich auch mal erweitern. ------------------ Gruß CADwiesel Besucht uns im CHAT
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
caddonner Mitglied
Beiträge: 166 Registriert: 24.05.2005
|
erstellt am: 16. Jul. 2013 10:26 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
hi - ich hole auch dieses alte Thema wieder nach oben. wie bringe ich den Code: (defun bw_ACAD_Layerstates (/ NameLst chk)..... zum laufen ? Und kann man den Code so erweitern dass das Datum ausgelesen wird wann ein Layerstatus zuletzt gespeichert wurde ? ------------------ mfg Peter
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADwiesel Moderator CAD4FM UG
Beiträge: 1968 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 16. Jul. 2013 10:55 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
|
caddonner Mitglied
Beiträge: 166 Registriert: 24.05.2005
|
erstellt am: 16. Jul. 2013 11:09 <-- editieren / zitieren --> Unities abgeben: Nur für T. Bürger
|