|
Rund um Autocad : Geänderte Dateien zentral auf Server legen
CADmium am 24.10.2006 um 16:05 Uhr (0)
..ich mach das so wie Fuchsi, allerdings mit Lisp und acad.lsp .. so daß bei ACAD-Starten neuere Dateien auf die lokale Platte kopiert werden.Klappt gut. Weiterhin habe ich alle Einstellungen ect. auf ein Verzeichnis umgebogen (was in Mechanical einiges an Aufwand war), so daß ich bloß noch die Daten dieses Verzeichnisses(incl. Subdirs) abgleichen muß. Aber auch die Zentrale Ablage der Nutzerprofile ect. auf den Server bringt seine Vorteile. Ist halt Ansichtssache.------------------ - Thomas -"Bei 99% al ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Layerbeschreibung per Lisp erstellen?
CADmium am 07.06.2007 um 15:16 Uhr (0)
IMHO am einfachsten:(setq LAYERNAME "AM_5")(setq BESCHREIBUNG "LAYER:AM_5")(and(not(vl-catch-all-error-p (setq LAYER(vl-catch-all-apply vla-item (list (vla-get-layers(vla-get-activedocument(vlax-get-acad-object))) LAYERNAME ) ) ) ) ) (vlax-property-available-p LAYER "DESCRIPTION") (vlax-put-property LAYER "DESCRIPTION" BESCHREIBUNG))------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : mehrere WBlöcke aus Verzeichnis aktualisieren
CADmium am 26.10.2006 um 08:01 Uhr (0)
Vorab: Was verstehst du unter einem WBLOCK? Vielleicht können wir uns auf den FAQ-Beitrag beziehen und den Austausch mit den Fachtermini führen....das vereinfacht die sache für alle Beteiligten und beugt Mißverständnisse vor (auch wenn einige Leute im Anfragen interpretieren schon recht gut sind )..Ich vermute mal, dir geht es um eine Art Blocktausch, bei dem Blockdefinitionen (incl.deren Referenzierungen) einer Zeichnung durch die Elemente (im Modellbereich) einer anderen DWG(/DXF) ersetzt werden sollen. ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : frage
CADmium am 25.02.2008 um 10:56 Uhr (0)
1. Falsches Brett - Besser wäre LISPFORUM gewesen2. Falsche Überschrift .. etwas aussagekräftigerer Betreff bitte beim nächsten Mal3. Wenn du schon mit der Rechtschreibung und der Textformatierung auf Kriegsfuß stehst, wirds mit Lisp auch nicht so doll werden4. Guck dir mal dieTutorials von Axel an, da solltest du alles nötige für den Einstieg finden. Gedruckt gibt es diese hier .....zu deiner konkreten Frage folgender Codeschnipsel:(setq a "Blabla")(setq FILE(open "c:Testus.txt" "w"))(princ a FILE)(close ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Set_by_layer.lsp
CADmium am 06.08.2004 um 09:32 Uhr (0)
Freut, mich, dass dir das Lisp gefällt und gute dienste leistet um den Linientyp nicht mehr zu verstellen äneder folgende Zeile: (defun UPDATE_OBJEKT ( OBJEKT / OBJEKTDATEN) (if (=(type OBJEKT) ENAME) ; Parameter o.k. ? (progn (setq OBJEKTDATEN (entget OBJEKT)) ; Objektdaten auslesen (if (assoc 8 OBJEKTDATEN) (progn (if (=(strcase(cdr(assoc 0 OBJEKT ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Schraffuren Farbe zuweisen
CADmium am 06.09.2007 um 09:42 Uhr (0)
nu ja .. ich hab mal Holgers Programm etwas modifiziertCode:(defun pre_hatch (reatyp befname / ) (cond ((wcmatch (car befname) "DIM*") (setq *oldC* (getvar "CECOLOR")) (setvar "CECOLOR" "1") ) ))(defun after_hatch (reatyp befname / ) (cond ((and (wcmatch (strcase(car befname)) "*HATCH*,*SCHRAFF*") *oldC* ) (setvar "CECOLOR" *oldC*) (setq *oldC* nil) ) ))(defun reaload () (if (not *DEFUN_HATCHCOLOR*) (progn (setq *DEFUN_HATCHCOLOR* (VLR-Command-Reactor "*DEFUN_HATCHCOLOR*" ((:v ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Highlightfunktion ausschalten
CADmium am 07.07.2008 um 09:12 Uhr (0)
Zitat:Original erstellt von cad-wolli:Morgen, habe mir einen Knopf gebastelt der die Funktion ein und ausschaltet.^C^C^P(if(not C:switch_previeweffect)(load"switch_previeweffect"))^P switchprewiewDafür brauch man aber die (Lisp-)Funktion C:switch_previeweffect (die du netterweise vergessen hast zu postenaber "Zweizustands" variablen kann man auch einfach mitsolchem Buttonmakro umschalten:^C^C(setvar "SELECTIONPREVIEW"(- 1 (getvar "SELECTIONPREVIEW")))sind mehrere Zustände möglich, die man duchschalten m ...
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad VBA : Variable aus Modul mit Zeichnung speichern
CADmium am 09.01.2007 um 07:57 Uhr (0)
du kannst dir auch ein Dictionary anlegen und in diesem die Daten z.B: in einem XRECORD speichern... geht aber auch alles per Lisp ( genauso wie XDATA) für Dictionaries und Xrecord findest du ein Beispiel in der Onlinehilfe..:Sub Example_AddXRecord() This example creates a new XRecord if one doesnt exist, appends data to the XRecord, and then reads it back. To see data being added, run the example more than once. Dim TrackingDictionary As AcadDictionary, TrackingXRecord As AcadXRecord Dim XRecord ...
|
| In das Form Autocad VBA wechseln |
|
Lisp : LISP
CADmium am 13.04.2008 um 17:04 Uhr (0)
.. ist das unsichtbarmachen über die Layersteuerung erfolgt, oder übers Invisible-Flag ( GC 66 ? ) ..bei letzteren solltest du z.B: bei www.cadwiesel.de mit noshow fündig werden. Von mir gibts auch noch was entsprechendes hier im Forum ... allerdings sind mir die Befehle WEG und DA etwas unbekannt------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Rechteck um eine From Zeichnen
CADmium am 19.12.2007 um 09:04 Uhr (0)
Machbar ist vieles ... aber Boundingbox liefert die Min/max koordianten im WKS.. und n Lisp mit richtiger Koordinatenanalyse ist etwas aufwendiger...und die andere Variante: Objekt um den BKS-Drehwinkel Temporär auf BKS-Welt zurückdrehen, mit Boundingbox die Koordinaten ermitteln .. im WKS das Rechteck zeichnen und mit dem schon ermittelten BKS-Winkel auf das BKS zurückdrehen finde ich auch nicht das Gelbe vom Ei------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Pr ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Layermanager LMAN per Lisp ablaufen lassen
CADmium am 14.06.2007 um 20:29 Uhr (0)
Zitat:Original erstellt von Peter2:Aber beim Wiederherstellen mit bns_c_restore_layerstate kann man nichts übergeben ... und.. ? haste dir mal die Funktion genauer angeguckt?Code:(defun bns_c_restore_layerstate ( / lstate lst2) (bns_reg_it) (while (not lstate) (setq lstate (xstrcase (getstring T "
Namen für wiederherzustellenden Layerzustand eingeben [?]:") ) );setq (if (not (equal "" lstate)) (progn...da machste dannCode:(defun spezial_bns_c_restore_layerstate ( lstate / lst2) (bns_r ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Makro Breitenfaktor / Textsil
CADmium am 21.08.2008 um 14:36 Uhr (0)
mit Makro wird das etwas schwierig, ich würd auf ein Lisp zurückgreifen, auch schon wegen den Texten in Blöcken .. Attributen usw.....beim Textstil kannst du per Makro auf die Befehlszeilenvariante von _-style zurückgreifen...------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Lisp aus Makro?
CADmium am 27.05.2005 um 11:46 Uhr (0)
so ? *^C^C(command _ucs o pause hpname ansi31 _bhatch ) ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben.
|
| In das Form Rund um Autocad wechseln |
