|
Rund um Autocad : Linie durch Polylinie ersetzen
marc.scherer am 26.02.2003 um 11:16 Uhr (0)
Hi, oder via Lisp: Code: (defun C:L2PL (/ SGET) (princ "Linien wählen...") (setq SGET (ssget (list (cons 0 "LINE")))) (if SGET (progn (command "_.pedit" "_m" SGET "" "_y" "") (princ (strcat "
OK, " (itoa (sslength SGET)) " Linie(n) zu(r) Polylinie(n) konvertiert !" ) ;_ end of strcat ) ;_ end of princ ) ;_ end of progn (princ "
Keine Linien gewählt !") ) ;_ end of if (princ) ) ;_ end of defun Die Lisp dann ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Linie durch Polylinie ersetzen
marc.scherer am 26.02.2003 um 12:06 Uhr (0)
Hi, ich hab auch noch einen... Code: (defun C:XL2PL (/) ;;; Geklaut von Axel Strubbe-Zettler ;-) (defun XORDRAW (P1 P2 P3 /) (grdraw P1 P3 -1) (grdraw P2 P3 -1) ) ;_ end of defun (defun GET-PT (P1 P2 / P PP) (setq PP (grread t 1)) (XORDRAW P1 P2 (cadr PP)) (while (= 5 (car (setq P (grread t 1)))) (XORDRAW P1 P2 (cadr PP)) (XORDRAW P1 P2 (cadr P)) (setq PP P) ) ;_ end of while (XORDRAW P1 P2 (cadr PP)) (if (= 3 (car P)) P ) ;_ end of if ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-->Attribute-->Werte finden und ersetzen
marc.scherer am 01.11.2002 um 10:04 Uhr (0)
Hi Benwisch, check mal diesen Code an, da müßtest Du alles drin finden was Du für sowas brauchst... Code: ;;; *********************************************************************** ;;; * ATT-CLONE dient zum Übertragen von Attributwerten eines Blockes auf * ;;; * beliebige andere Blöcke. * ;;; * Bei identischen "Feldnamen" (also AttributNAMEN) wird der Wert des * ;;; * Quellblocks als Wert des zu klickenden Zielblocks eingetragen. * ;;; * Versuch s mit de ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Blöcke ersetzen durch Blöcke aus Vorlagenzeichnung
marc.scherer am 31.03.2005 um 08:59 Uhr (0)
Zitat: Original erstellt von wisch: Jetzt sollte es Möglich sein, dass ich in der Zeichnung A alle auszutauschenden Blöcke markieren o.ä. kann und durch die Blöcke in der Vorlagenzeichnung V1 ersetze. ersetze BLOCK1 in Zeichnung A durch BLOCK1 in Vorlagenzeichnung V1 usw. Wenn Du das GENAU so haben willst und nicht die diversen Blocktauscher und Block-Rausschreiber die hier schon zig mal geuppt wurden verwenden willst weil es Dir zuviele Arbeitsschritte sind, würde ich über eine Auftragsprogramm ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Flächen berechnen, Fehler in Lisp-Routine
marc.scherer am 23.02.2008 um 14:18 Uhr (0)
Zitat:Original erstellt von andi90:Es währe schön, wenn jemand das Problem lösen könnte.Offensichtlich hat sich in 2007 der Options-Buchstabe für "Unten" beim Befehl Draworder verändert...Einfach folgendes machen:Code:und-color: #FFFF99'>Suchen im Lisp Prog:(command "_draworder" "L" "" "N" (ssname aws 0))Ersetzen durch:(command "_draworder" "L" "" "U" (ssname aws 0))...------------------Ciao,Marc
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Script für Schriftstile
marc.scherer am 12.01.2005 um 18:57 Uhr (0)
Hi, wenn es Dir darum geht vorhandenen Mtext-Objekten einen anderen Schriftstil zuzuweisen, benötigst Du kein Script. Markiere Dir alle und-color: #FFFF99'>MTexte die den neuen Stil bekommen sollen (Auswahlsatz eventuell über Filter oder Schnellauswahl...), rufe via STRG + 1 das Eigenschaftenfenster auf und such Dir dort den Eintrag Stil . Klicke auf das Feld dahinter und wähle aus dem Listenfeld den neuen Stil. Sollte es sich bei Deinen Texten aber um einzeln zugewiesenen Stilüberschreibungen im MText handeln, wird sich nix ...
|
| In das Form Rund um Autocad wechseln |
|
Autodesk GIS Produkte : XDATA => Objektdaten überführen
marc.scherer am 17.07.2008 um 16:10 Uhr (0)
Hi Jan,das ganze ist ja relativ simpel, da Map ja über eine exzellente Lisp-API verfügt.Das heißt, Du hast alle Mittel die man benötigt um die typischen Tabellen und Datentypen anzulegen sowie Map-Objektdaten irgendwo anzuhängen als Bibliotheksfunktionen vorliegen. Die Dokumentation ist auch recht ordentlich und sollte Dir als erfahrenem Lispler wenig Kopfschmerzen bereiten. Einfach mal in der MapHilfe und dem Programmverzeichnis nach Developer Hilfedateien und Beispiellisps und-color: #FFFF99'>suchen. Suchtip: Zwei der Funkt ...
|
| In das Form Autodesk GIS Produkte wechseln |
|
Rund um Autocad : text
marc.scherer am 25.02.2005 um 09:54 Uhr (0)
Hi, versuch mal das folgende Lisp: Code: (setq cad:de:txtsubst "W0.72;") (defun C:CAD:DE:MTEXTCLEAN (/ ELEM INDEX SGET) (princ "
Zu modifizierende und-color: #FFFF99'>Mtexte wählen: ") (if (setq SGET (ssget (list (cons 0 "MTEXT")))) (progn (setq INDEX 0) (repeat (sslength SGET) (setq ELEM (vlax-ename- vla-object (ssname SGET INDEX))) (vlax-put-property ELEM TEXTSTRING (vl-string-subst "" CAD:DE:TXTSUBST (vlax-get-property ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : SHX-Dateien nachladen
marc.scherer am 08.11.2006 um 10:25 Uhr (0)
Hi cad-di,da war ich dann auf dem Holzweg.Bei mir kommt die Meldung bei fehlenden Schriften IMHO gar nicht, weil sysvar FONTALT bei mir auf "simplex.shx" steht und damit fehlende Schriften automatisch ersetzt werden.Meldungen kommen bei mir immer nur bei Symbol-SHXn.Du solltest auf jeden Fall mal die Acad Hilfe zum Thema: "Ersetzen von Schriften" lesen...------------------Ciao,Marc
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : mit weiterführende Bemaßung bleiben Hilfslinien lang ? schaue das Bild an!
marc.scherer am 23.01.2004 um 12:04 Uhr (0)
Hi Zeichner, lang nix federleichtes mehr von Dir gehört ;-). Geh mal hier hin: http://www.cadinfo.net/files/a-dims2.lsp Da ist u.a. eine Funktion "DIMCUT" enthalten. Mit der kannst Du die Länge der Hilflinien im nachhinein verändern. Tip: Du mußt in dem Quellcode die Variable "Dimaso" durch "dimassoc" ersetzen, wenn Deine Acad-Version = 2002 ist. ------------------ Ciao, Marc
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : mtext : blue screen
marc.scherer am 23.04.2004 um 12:56 Uhr (0)
Hi, welche Hardware hast Du? Ich würde der Reihe nach folgendes machen: Internet: Bios Update für Dein Mainboard und-color: #FFFF99'>suchen Neuesten Treiber für Deine Grafikkarte für Dein OS und-color: #FFFF99'>suchen Bios-Werte aufschreiben Bios-Update Neustart Bios-Werte im Bios auf Default setzen und dort sichern Neustart Bios-Werte = aufgeschriebene Werte setzen und sichern Neustart NT booten Grafikkarten-Treiber deinstallieren Neustart NT booten Neuen Grafkkarten-Treiber installieren Neustart NT booten Grafikkartentreiber evtl. konfiguriere ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Bemaßung und Bauwesen
marc.scherer am 11.04.2003 um 13:20 Uhr (0)
Zitat Holger: "Du kannst auch gerne mal nach dem Stichwort Feder und-color: #FFFF99'>suchen ... (aber bloß nicht danach fragen!)" *Gröööööhlllll* *Schmeiß vor lachen aus dem Fenster* ------------------ Ciao, Marc
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Dateisperre in 2000i
marc.scherer am 05.12.2001 um 09:45 Uhr (0)
Hi, wenn Du im Netzwerk gehobene Rechte hast, solltest du auf der Autodesk Website mal nach "Openby.arx" und-color: #FFFF99'>suchen. Dieses Pgm kann Dir zeigen, welche Dateien gerade von wem genutzt werden. Ciao, Marc
|
| In das Form Rund um Autocad wechseln |
