|
Rund um Autocad : VBA - getpoint - keine tranparenten Befehle möglich
mallorca7 am 22.07.2003 um 14:59 Uhr (0)
Hi, @Alle leider habe ich keine Zeit gehabt mich weiter in VBA zu beschäftigen, wollte ich ja, deshalb habe ich dieses Problem ins Forum gestellt. Ich programmiere in letzter Zeit auch sehr wenig. Wie ist das dann eigentlich in ObjectArx, habe die Programmierertools von der Autodeskhomepage downgeladen. Habe aber gelesen, das dort (bei Acad 2004) auch mit .Net programmiert wird, heißt also dann C# (Sharp) und dann wieder Windows XP Professional oder Win2000 Prof. Nachdem ich ja verzweifelt und vergeblich ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Speichern unter
SebZ am 23.05.2007 um 13:14 Uhr (0)
Hallo Alfred,wenn du dich ein bisschen mit Lisp auskennst, könnte dieser Codeschnipsel funktionieren (unter 2004 ungetestet).Nach Belieben kannst du den Zeichnungsnamen noch einstellen. Mit den Systemvariablen DWGPREFIX und DWGNAME hast du Zugriff auf den aktuellen Pfad und Namen deiner Ausgangsdatei, aus denen du ja vielleicht noch eine neue Bezeichnung bilden möchtest.Code:(defun c:multisave() (setq fd-alt (getvar "FILEDIA")) (setvar "FILEDIA" 0) (command "_saveas" "2004" "") (command "_saveas" "DXF" "V" ...
|
| In das Form Rund um Autocad wechseln |
|
Autocad VBA : Auswahl nächste Polylinie
fuchsi am 14.12.2004 um 11:07 Uhr (0)
ich hab sowas mal gebraucht für eine FM-Lösung (allerdings in Lisp, soltte aber auch in VBA lösbar sein) ausgehend vom Basispunkt des Blockes habe ich 4 Auswahlsätze erstellt (subkriterium:geschlossneen Polylinie) 1. Auswahlsatz mittels ZAUN ausgehend vom Basispunkt nach links 2. Auswahlsatz mittels ZAUN ausgehend vom Basispunkt nach rechts 3. Auswahlsatz mittels ZAUN ausgehend vom Basispunkt nach oben 4. Auswahlsatz mittels ZAUN ausgehend vom Basispunkt nach unten so nun wird ein Auswahlsatz untersucht, u ...
|
| In das Form Autocad VBA wechseln |
|
AutoLisp : Text beim kopieren sichbar
mkl-cad am 14.11.2005 um 09:59 Uhr (0)
Hallo,das habe ich mir fast gedacht. Dazu verwenden wir foldendes Lisp:(defun c:e-nummer ( / wert a r o o2 l aa) (setq wert 1 r -1 a (ssget "x" ((0 . "Insert") (2 . "E-nr")))) (if (= a nil)()(progn (repeat (sslength a) (setq r (+ r 1)) (setq o (ssname a r)) (setq o2 (atoi (cdr (assoc 1(entget(entnext o)))))) (if (= o2 nil)(setq o2 "0")()) (if (or ( o2 wert)(= o2 wert))(setq wert (+ 1 o2))()) ))) (setq aa (tblsearch "layer" "E-stromkreisnr-ne")) (if (= aa nil) (command "layer" "neu" "E-stromkreis ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Dyhamische Blöcke tauschen
marc.scherer am 28.07.2009 um 09:40 Uhr (0)
Hi Mangrove,Du könntest mal versuchen mit folgendem Lisp einen internen dynamischen Block mit ner externen DWG die einen dynamischen Block definiert upzudaten. Bei normalen Blöcken funktioniert das problemlos, wozu das bei dynamischen Blöcken führt kannst Du ja einfach mal ausprobieren. Übrigens kann bei dieser Lösung der externe Name sich vom internen Namen der Blockdefinition komplett unterscheiden (siehe Kommentare am Anfang des Progs...)Update: Ich hab auch noch mal berücksichtigt, das der Blockname am ...
|
| In das Form Rund um AutoCAD wechseln |
|
CoCreate Modeling : Anno Bemaßen in aktiver Ansicht
Knuddel25 am 23.03.2009 um 10:28 Uhr (0)
Morgen,also ich geh da immer so vor:Ich lade das angrenzende Teil oder Baugruppe hinzu, packe es in einen Behälter (müsste mit Baugruppe auch funktionieren, aber mit Behälter wird es im 3D und Anno nicht direkt mit angezeigt). Dann sage ich im Anno über Teile verwalten, Behälter hinzu, muss man machen, Behälter werden nicht direkt mit angezeigt.Dann lade ich mir folgendes LISP .Bei Teileauswahl kann man mit dem Auswahlmenü oder F2 auch Baugruppen, bzw. alle Teile in Baugruppe auswählen.Bemaßen geht dann au ...
|
| In das Form CoCreate Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : Zukunft direktes Modellieren bei PTC
Walter Geppert am 29.01.2016 um 10:10 Uhr (7)
Zitat:Original erstellt von Michael Leis:Hallo,jetzt hat sich der Thread zu einer Retro-Namens-Pro-SolidDesigner-Diskussion hochgeschaukelt. Das muss zwar auch alles mal gesagt werden dürfen. Die Ausgangsfrage war aber eigentlich die, ob wir mit unserem Ansatz des Direktmodellierens in Zukunft eine Heimat bei PTC haben werden, oder ob wir neben dem mächtigen CREO Parametric nur noch eine ungepflegte Außenseiterrolle übernehmen dürfen.Weiß dazu jemand etwas neues?MichaelNach Auskunft meines Händlers des Ver ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
AutoLisp : Polylinie > Eigenschaften übernehmen!
fuchsi am 25.07.2005 um 15:30 Uhr (0)
also, Dein Lisp Programm macht eigentlich nicht viel anderes als der Pinsel-Befehl in Auto Cad (allerdings rein beschränkt auf Polylinien) Übertragen der Eigenschaften LAYER,FARBE,BREITE und LINIENTYP von eiener Polylinie auf die andere. (Warum das Porgrammerle allerdings so kompliziert geschrieben worden ist, ist mir eine Rätsel, das würde ein simpler 5-Zeiler genauso machen, aber man kanns ja mit der Active-X Schnittstelle auch etwas übertreiben) Das was du da kopieren möchtest : ...(-3 ( LTNR_00042 ( ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Funktion zum Öffnen einer Lisp-Datei
Brischke am 22.11.2011 um 16:31 Uhr (0)
Zitat:Original erstellt von Barbara33:... Nun wird eine Funktion gesucht, die in dieser Datei stehen soll, die diese so öffnet (vielleicht mit Wordpad?), um darin händisch Änderungen oder Ergänzungen vornehmen zu können. ...Hallo Barbara,darf ich mal ganz blöd, nach dem Sinn dessen fragen?In meiner Zeit als CAD-Admin habe ich strengstens verboten, dass irgendjemand Änderungen in den Lisps vornimmt.Oder bist du in einem Büro beschäftigt, dass sich ausschließlich mit der Programmierung beschäftigt (wo das d ...
|
| In das Form Lisp wechseln |
|
CoCreate Modeling : Exemplare zählen und ausblenden
Walter Frietsch am 27.06.2005 um 16:09 Uhr (0)
Zitat:Original erstellt von netvista:Hallo!Ich hab ein sehr gutes Makro (Anhang) dass ich sehr oft nutze, würde aber eine zusätzliche Funktion brauchen.Es gibt einen Button Alle Exemplare anzeigen dabei werden die gefundenen Exemplare in einem neuen Fenster angezeigt.Ich möchte jetzt noch einen zusätzlichen Button haben der die gefundenen Exemplare im aktuellen Fenster von der Darstellungsliste entfernt.Der Hintergrund ist, wenn man im Vorfeld schon Teile bestellen will kann ich nichts doppelt Zählen und ...
|
| In das Form CoCreate Modeling wechseln |
|
Programmierung : Liste in LISP sortieren
noxx am 05.03.2007 um 18:09 Uhr (0)
Zitat:Original erstellt von der_Wolfgang:Und wenn Du schon mehrere nullen hast, dann wirst Du vermutlich auch mal mehrfach die "3" haben, oder?damit sei Dir auch die Empfehlung gegeben mal bei der Funktion remove-duplicates vorbeizuschauen ggf. in Verbindung mit oli::sd-num-equal-p Nein, es sind nur 0en die doppelt sind.Habe das bisher so gelöst: (setf sorted (stable-sort (list zahl1 zahl2 zahl3 zahl4) # )) (delete 0 sorted) (mapc #(lambda(place val) (setf (symbol-value place) val)) (list neu1 neu2 ...
|
| In das Form Programmierung wechseln |
|
AutoLisp : Fehler in meiner MNU Datei
Waldemar am 08.03.2004 um 14:19 Uhr (0)
Hallo Forum, beim Dazuladen eigener Menüdatei über ein zus. Programm (Lisp) taucht nachfolgende Fehler meldung auf: Laden des Menüs mißlungen. Datei nicht gefunden: _menuload.(mnu/mns/mnc) . Das Menü wird allerdings korrekt hinter dem Acad Menü geladen. Habe es nachvollzogen, das es nicht am Ladeprogramm liegt. Anbei Teil daraus: (if (findfile acetmain.mnc ) (progn (princ
Lade Fremdprogramme: Express ) (command _menuload ACETMAIN ) (menucmd P13=+express.pop1 ) ;; wurde von p12 auf p1 ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Autocad Flächenberechnung
Brischke am 04.06.2004 um 11:18 Uhr (0)
Hallo seven, das Schraffurobjekt weiß ja selbst innerhalb welcher Grenzen es sich befindet. Diese Grenzen liest das Programm aus und bastelt daraus eine Polylinie. Die Schwierigkeit besteht nur darin diese Umgrenzungspfaddaten richtig zu interpretieren, da diese doch recht komplex sind. Interessanter wird das ganze allerdings, wenn die Schraffur explodiert wurde, also keine Schraffur mehr ist. Ich habe auch dafür mal ein Tool geschrieben, welches bisher allerdings nur mit aufgelöster Linien-Schraffur unt ...
|
| In das Form Rund um Autocad wechseln |
