|
AutoLisp : DesignCenter Datei-Erweiterungs-Enabler
marc.scherer am 01.03.2004 um 17:28 Uhr (0)
Hi, wie schon im RuA- Forum angekündigt, hier das vorläufige Tool zum aktivieren/deaktivieren von Dateierweiterungen die eigentlich DWG s sind, standardmäßig aber vom DesignCenter nicht angezeigt werden. Wünsche, Fragen, Anregungen bitte hier posten. Code: (vl-load-com) (defun C:ADC+ (/ ERASEFLAG EXTENSION) (if (not (REG:TESTWRITE)) (alert (strcat Sorry, Sie haben keine Schreib-Rechte auf die Windows-Registrierung.
Kontaktieren Sie Ihren CAD-Admin oder loggen Sie sich als ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : (vla-put-HyperlinkDisplay...
marc.scherer am 04.10.2005 um 13:40 Uhr (0)
Hi Wolfgang,klar scheitert das.Du versuchst bei einem Entity eine Eigenschaft anzuwenden, die dieses gar nicht hat...Versuch mal folgendes mit einem gezeichneten Objekt:Code:(vlax-dump-Object (vlax-ename-vla-object (car (entsel))) T)-Code:; IAcadBlockReference: AutoCAD Block Reference-Schnittstelle (Blockreferenz); Eigenschaftswerte:; Application (RO) = #VLA-OBJECT IAcadApplication 00b9d604; Document (RO) = #VLA-OBJECT IAcadDocument 1354e8a0; Handle (RO) = "8DA6"; HasAttributes (RO) = -1; HasExtension ...
|
| In das Form AutoLisp wechseln |
|
Lisp : druckbereich in Lisp
marc.scherer am 10.03.2005 um 17:24 Uhr (0)
Hi,über ActiveX läßt sich das relativ einfach realisieren...Du benötigst ein paar Methoden und Eigenschaften des aktiven Layoutsund kannst Dir daraus den "druckbaren Bereich" rechnen...Wichtig sind hier die Methoden:getPaperSize - Gibt die Blattgröße zurückgetPaperMargins - Gibt die Randabstände zurückund die Eigenschaften:PLOTORIGIN - Gibt den Plotursprung zurückPlotRotation - Gibt die Blattdrehung zurückJe nachdem wie das Blatt nun gedreht ist und der Plotursprung liegt kann man nun genau die Layout-Koor ...
|
| In das Form Lisp wechseln |
|
Lisp : druckbereich in Lisp
marc.scherer am 10.03.2005 um 17:24 Uhr (0)
Hi,über ActiveX läßt sich das relativ einfach realisieren...Du benötigst ein paar Methoden und Eigenschaften des aktiven Layoutsund kannst Dir daraus den "druckbaren Bereich" rechnen...Wichtig sind hier die Methoden:getPaperSize - Gibt die Blattgröße zurückgetPaperMargins - Gibt die Randabstände zurückund die Eigenschaften:PLOTORIGIN - Gibt den Plotursprung zurückPlotRotation - Gibt die Blattdrehung zurückJe nachdem wie das Blatt nun gedreht ist und der Plotursprung liegt kann man nun genau die Layout-Koor ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : ACAD 2010, im Layout sehr langsam
marc.scherer am 25.11.2009 um 09:58 Uhr (0)
Hatte doch kein Lisp geschrieben, wollte ich nur immer tun...Aber jetzt hab ich eines ;-)Code:(VL-LOAD-COM);|Funktion deaktiviert die Option "Plotstile anzeigen" für alle Layouts einer Zeichnung.Argumente:KeineRückgabewerte:Liste von Vl-Objekten der Layouts bei denen die Option erfolgreich verändert wurde, bzw. eine Änderung überhaupt erforderlich war.Oder nil, wenn nix geändert wurde.Beispielaufruf:(setq xx (CAD:DE:NOSHOWPLOTSTYLES))|;(defun CAD:DE:NOSHOWPLOTSTYLES (/ RETVAL) (vlax-for ITEM (vla-get-layo ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : ACAD 2010, im Layout sehr langsam
marc.scherer am 25.11.2009 um 09:58 Uhr (0)
Hatte doch kein Lisp geschrieben, wollte ich nur immer tun...Aber jetzt hab ich eines ;-)Code:(VL-LOAD-COM);|Funktion deaktiviert die Option "Plotstile anzeigen" für alle Layouts einer Zeichnung.Argumente:KeineRückgabewerte:Liste von Vl-Objekten der Layouts bei denen die Option erfolgreich verändert wurde, bzw. eine Änderung überhaupt erforderlich war.Oder nil, wenn nix geändert wurde.Beispielaufruf:(setq xx (CAD:DE:NOSHOWPLOTSTYLES))|;(defun CAD:DE:NOSHOWPLOTSTYLES (/ RETVAL) (vlax-for ITEM (vla-get-layo ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Attributsdaten übertragen
marc.scherer am 07.05.2009 um 16:50 Uhr (0)
Hi Iris2,hier Deine Lösung für jeweils ein Layout.In den ersten Zeilen des Proggies:Code:(setq SOURCENAME "Kopf####" TARGETNAME "Kopf@###")legst Du den Schlüssel für Quell- und Zielblock fest, das liest sich dann für AutoCAD so:"Kopf####" = Zeichenkette: "Kopf" Nummer Nummer Nummer Nummer"Kopf@###" = Zeichenkette: "Kopf" AlphabeticCharacter Nummer Nummer NummerWenn sich die Namen also ändern, müßtest Du eben da Hand anlegen.Kopiere einfach den folgenden Code zum Ausgangsprogramm hinzu, speichere es, lade e ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Layer in access einlesen und wieder zurück
marc.scherer am 30.08.2005 um 18:07 Uhr (0)
Hi Triple_Miki,nur mal so aus Interesse...Was hast Du denn damit gewonnen die Layerstruktur mit ner DB zu verbinden?Was soll in der DB mit den Layern passieren?Du mußt doch sowieso einmal jede Kombination definieren, schon umdie Werte für z.B. Farbe, Linientyp, Schaltzustand usw. einzurichten.Was spricht dagegen, das EINMAL in ner Zeichnungsvorlage zu tun und dann,1. Jede neue Zeichnung mit dieser Vorlage zu beginnen?2. In Zeichnungen die diese Layer NICHT enthalten die entsprechenden Layer aus der Vorlage ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Attributsdaten übertragen
marc.scherer am 15.03.2004 um 14:09 Uhr (0)
Hi,ich melde mich nun auch noch mal zu Wort.Hier die Lösung mit getrennten Aufrufen vom Lesen (AC-R) und Schreiben (AC-W), jedoch auch unter R14 lauffähig, da ich das vl-bb-ref/set einfach durch ne globale Variable ersetzt habe.Code:;;; ***********************************************************************;;; * ATT-CLONE dient zum Übertragen von Attributwerten eines Blockes auf *;;; * beliebige andere Blöcke. *;;; * Bei identischen "Feldnamen" (also AttributNAMEN) wird der Wert des *; ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Layer nicht aktuell setzen
marc.scherer am 07.04.2003 um 11:53 Uhr (0)
Hi, wenn Axel schon was allgemeines dazu beisteuert will auch ich das tun... Reaktoren sind wirklich nicht das gelbe vom Ei. Aber man kann auch auf andere Weise ähnliche Effekte erreichen, gerade dann wenn Aufgaben sich häufig wiederholen. Ich habe mir ein Lisp-Konstrukt gebaut, in dem man Themenbezogen arbeitet; also z.B. Thema: Wasserleiungen, oder Gasleitungen usw. Man wählt ein Thema und verwendet einen Extra-Werkzeugkasten für diverse Befehle die man so braucht (z.B. Text erzeugen, Bemassen, Leitung z ...
|
| In das Form Rund um Autocad wechseln |
