|
Lisp : Auswahlmöglichkeit beim Plotten
CADmium am 03.09.2009 um 08:47 Uhr (0)
(defun WarDateiPlot2000 (/ p1 p2 File Ausrichtung)(initget "Hoch Quer")(if(=(getkword "
Blattausrichtung [Hoch/Quer]Hoch: ")"Quer") (setq Ausrichtung "Q") (setq Ausrichtung "H"))(command "_.-plot")(command "_y") ; detailliert?(command "Model") ; Layoutnamen eingeben(command "FreePDF XP") ; Ausgabegerätname eingeben(command "A4") ; Papierformat angeben(command "M") ; Papiereinheiten angeben(command Ausrichtung) ; Ausrichtung der Zeichnung angeben(command "_n") ; Auf dem Kopf plotten?(command "_w") ; Plotber ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : hilfe bei maßstabeinstellungen
CADmium am 20.03.2007 um 16:31 Uhr (0)
Zitat:Original erstellt von blaubaermd:ja na nürlich weiß ich nicht wie ACAD arbeitet. befassen mich ja auch erst 3 wochen damit. natürlich kommt nochmal ne schulung, aber momentan will ich eben selber weiterkommen und suche hier hilfe.nochmal zu dem problem:ich möchte das ich bei ACAD 323,9 als original maß eingebe und ACAD das auf meinem A4 blatt als 32,29 darstellt.also ein maßstab 1:10. das ging auch schonmal, nur denk ich das es mehr glück als wissen war.dann stell vor dem Bemaßen die SYSVAR DIMLFA ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Ursprung für alle Layouts
CADmium am 16.08.2004 um 08:49 Uhr (0)
was ist denn nun hiermit ??? (defun EXPLODE (/ AUSWAHL OBJEKT VLA-OBJEKT LASTOBJ) (vl-load-com) (setq AUSWAHL (ssget X )) (while ( (sslength AUSWAHL) 0 ) (setq LASTOBJ (entlast)) (repeat (sslength AUSWAHL) (setq OBJEKT (ssname AUSWAHL 0)) (setq VLA-OBJEKT (vlax-ename- vla-object OBJEKT)) (if (vlax-method-applicable-p VLA-OBJEKT explode) (vl-catch-all-error-p (vl-catch-all-apply vlax-invoke-method (l ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Aus Layouts eigene DWG erstellen
CADmium am 18.07.2007 um 12:23 Uhr (0)
Zitat:Original erstellt von Entsorger01: Gibt es die Möglichkeit,.. ähnlich dem Publizieren beim Drucken, alle Layouts mehrerer Dateien, die in einem Ordner abgelegt sind, als eigene Dateien auszulesen. Idealerweise sollten die so neu erstellten Dateien den Layoutnamen als Dateinamen haben...Dabei sollen aber keine Objekte aus der Zeichnung (auch Modellbereich) entfernt werden..Also eigentlich eine Verkürzung der Arbeitsschritte "Eine Datei nach der anderen öffnen" -- "Datei speichern unter" (einmal pro L ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : SOLID Reihenfolge
CADmium am 04.12.2013 um 12:58 Uhr (1)
Ist normal ....Mit „ZEICHENREIHENF/_draworder“ kann die Zeichnungsreihenfolge aller sichtbaren Objekte (d. h. die Anzeige- und Plotreihenfolge) geändert werden. Hierbei werden aber nicht die Geometrieobjekte in der Zeichnungsdatenbank umsortiert, sondern diese nur indiziert und die Objektzeiger entsprechend der gewünschten Anzeigereihenfolge sortiert in einer sogenannten "AcDBSortanstable" (so der korrekte Objektname) abgelegt. Diese Tabelle ist Bestandteil des ExtensionDictionarys des jeweiligen Blockes, ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Button für Ungroup Erstellen
CADmium am 10.05.2006 um 10:17 Uhr (0)
Zitat:Original erstellt von GTVLeader:Thanks for help, das Lisp funktioniert sehr gut! Zum Thema falsche Arbeitsweise... Ich habe früher auf dem 2D System Medusa gearbeitet (damals noch Krankonstrukteur) und in dem Programm konnte man sehr gut eine Struktur erstellen und sich auch anzeigen lassen. Vor allem konnte man auch ohne großes Auflösen, Block Editor etc etc Bauteile in der Struktur bearbeiten bzw. in der Struktur verschieben. Die Bauteile konnten auch wie Blöcke aus einer Datenbank eingeladen werd ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Objekt durch auf ein anderes Layer legen, neuer Layer = alter Layer+koo
CADmium am 27.10.2005 um 14:02 Uhr (0)
Offtopic: ...zum Verständnis, warum ich immer zwischen Insert/Blockreferenz und Blockdefinition unterscheide...... denke, der Holger meint das ähnlich..Objekte einer Autocadzeichnung, die eine grafischer Darstellung besitzen kurz Entitys können in Blöcken zusammengefasst werden. Diese Block-Container werden einmal in der Zeichnungsdatenbank in der Blocktabelle (BlockTableRecord) - gespeichert. Blöcke selbst haben keine grafische Darstellung. Durch den ACAD-Befehl EINFÜGE / _insert kann dann eine Block ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Unsichtbares Attribut
CADmium am 29.03.2012 um 14:22 Uhr (0)
Wie sicher bekannt, sind Attribute an Blockreferenzen gebundene Textobjekte die nachträglich verändert werden können, ohne die Blockreferenz aufzulösen. Basis der Attribute sind die Attributdefinitionen im Blockcontainer. Das sind ebenfalls Textobjekte mit besonderen zusätzlichen Eigenschaften hinsichtlich ihrer Visualisierung. Für diese sind neben der Systemvariable ATTMODE die Eigenschaften KONSTANT und UNSICHTBAR verantwortlich. Eine Attributdefinition mit der Eigenschaft KONSTANT generiert bei der Bloc ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Block im Block im Block...
CADmium am 23.08.2011 um 16:21 Uhr (0)
ungetestet n Frühwerk von mir :(defun c:Explode_2D_Blocks ( / AUSWAHL OBJEKT INDEX MODUS OBJEKTDATEN BLOCKNAME BLOCKDEF BLOCKELEMENT) (initget "G A") (setq MODUS (getkword (strcat "
Ganze Zeichnung oder Auswahl: G "))) (if (not MODUS) (setq MODUS "G")) (if (= (strcase MODUS) "G") (setq AUSWAHL (ssget "X" ((0 . "INSERT")))) (setq AUSWAHL (ssget ((0 . "INSERT")))) ) (if AUSWAHL (progn (while ( (sslength AUSWAHL) 0 ) (setq OBJEKT (entlast)) (setq INDEX 0) (repeat (ssleng ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : dimcenter
CADmium am 06.03.2005 um 20:04 Uhr (0)
Die Hilfe sagt: DIMCEN (Systemvariable) Typ: Reelle Zahl Gespeichert in: Zeichnung Ausgangswert: 0.0900 Steuert das Zeichnen der Zentrumspunkte von Kreisen oder Bogen sowie der Mittellinien mit den Befehlen BEMMITTELP, BEMDURCHM und BEMRADIUS. Bei BEMDURCHM und BEMRADIUS wird der Zentrumspunkt nur dann gezeichnet, wenn die Maßlinie außerhalb des Kreises oder Bogens platziert wird. 0 Es werden keine Zentrumsmarken oder Linien gezeichnet. 0 Es werden Zentrumslinien gezeichnet. 0 Es werden Zentrumsm ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Textzähler
CADmium am 07.02.2005 um 09:21 Uhr (0)
Deinen Wunsch 100 % umgesetzt (ohne Glaskugel ): (if (setq l (ssget "_x" ((0 . "*TEXT")(1 . "Schraube")))) (sslength l) 0) Willst du noch verschachtelte Blöcke usw Berücksichtigen hilft dir das weiter: (defun COUNT-TXT(TEXTSTR / BLOCK COUNT) (vl-load-com) (setq COUNT 0) (vlax-for LAYOUT (vla-get-layouts(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM (setq BLOCK (vla-get-Block LAYOUT)) (if(and(member(strcase(vla-get-objectname ITEM)) ("ACDBMTEXT" "ACDBTEXT")) ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : A$C* Blockname
CADmium am 25.04.2007 um 12:25 Uhr (0)
Zitat:Original erstellt von epb:Als "Ing" ist man gewohnt und dafür ausgebildet präzise zu arbeiten, da ist klar, es kommen keine A$-Blöcke in die Zeichnung rein und der minimale zeitliche Mehraufwand um dem Block einen vernünftigen Namen zu geben wird in Kauf genommen.Quatsch ... ich baue meine Hauptbaugruppe aus mehreren Untergruppen auf, in vielen Untergruppen sind z.B. Achsen enthalten ... wenn ich mir dafür einen Sachmerkmal-Blocknamen ausdenken würde wäre der genauso kryptisch wie "A$..."Mir gehts m ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Text automatisch ersetzen
CADmium am 30.09.2004 um 16:43 Uhr (0)
ok... dann speicher dir folgende Zeilen mal als *.lsp : (defun UPDATE-Title-Block ( INSERTNAME ATTRIBNAME ATTRIBWERT / AUSWAHL INDEX OBJEKTDATEN) (if (= (type INSERTNAME) STR) (setq AUSWAHL (ssget _x (list (0 . INSERT )(cons 2 INSERTNAME)))) ) (if(or AUSWAHL (setq AUSWAHL (ssget _x ((0 . INSERT )))) ) (progn (setq INDEX -1) (repeat (sslength AUSWAHL) (setq OBJEKTDATEN (entget (ssname AUSWAHL (setq INDEX (1+ INDEX))))) (if (assoc 66 OB ...
|
| In das Form AutoLisp wechseln |
