|
Lisp : Funktion zum Öffnen einer Lisp-Datei
Barbara33 am 22.11.2011 um 14:36 Uhr (0)
Hallo eine Frage zum Öffnen von lsp-Dateien: AutoCAD eines Anwenders ist so eingestellt, dass "MeinStart.lsp" bereits beim Öffnen einer Zeichnung geladen wird. Das ist die Ausgangslage. 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. Sie sollte natürlich den jeweils aktuellen Standort (Pfad) dieser Datei berücksichtigen, denn der kann ja bei jedem Nutzer anders sein. LG, Barba ...
|
| In das Form Lisp wechseln |
|
Lisp : Funktion zum Öffnen einer Lisp-Datei
Barbara33 am 22.11.2011 um 17:57 Uhr (0)
OK, habe jetzt eine Lösung gefunden. Mit startapp "notepad" kann man eine Datei mit Pfadangabe öffnen. Vielleicht ist es nicht der optimale Weg, aber ich mache es so: Wenn ich ein Lisp-Programm testen will, dann schreibe ich es in meine Spielwiese namens "mein.lsp", und das liegt in einem eigens angelegten Ordner in meinen documents-Ordner. Dieses Programm wird bei jedem AutoCAD-Start automatisch geladen, weil ich es so in _APPLOAD angegeben habe, in der Startup Suite. In diesem "mein.lsp" sind erst einmal ...
|
| In das Form Lisp wechseln |
|
Lisp : LISP unter Version 2014
symantec am 24.05.2013 um 12:29 Uhr (0)
Hallo Cadmium,es spielt keine Rolle, ob ich dem aktuellen Textstil eine Höhe gebe oder nicht.Nachdem alle Werte in der Box eingegeben wurden, sieht es in der Befehlszeiledann so aus - er sucht den 1. Punkt für die Textbasislinie:Befehl: RASTlinker oberer Eckpunkt:100,100rechter oberer Eckpunkt:300,200Startpunkt:Ungültiger Punkt.Abbruch...Ersten Endpunkt für Textbasislinie angeben: Nehme TEXT-Befehl wieder auf.Ersten Endpunkt für Textbasislinie angeben:Zweiten Endpunkt der Textbasislinie angeben:Gruß Symant ...
|
| In das Form Lisp wechseln |
|
Lisp : DXF-EXPORTIEREN
udouk am 26.08.2009 um 15:00 Uhr (0)
Danke für die superschnelle Antwort!!!Also, mein Versuch eine Vorhandene Kopieren & Drehen LISP-Datei umzuschreiben sieht nun so aus:_________________________________________________________________________(VL-LOAD-COM)(defun C XF-EX (/ SGET)(princ "
Objekte zum Exportieren wählen: ")(if (setq SGET (ssget))(DXF-EX SGET))(princ))(defun DXF-EX (AUSWAHL / LST-ORGOBJECTS P SSET-COPIED)(if (setq LST-ORGOBJECTS (DT:SELSET-VLA-OBJECTLIST AUSWAHL))(while (setq P (DT:SAFE-EVAL(list getpoint"
Nullpunkt wählen: ")))( ...
|
| In das Form Lisp wechseln |
|
Lisp : Texte einfügen
Dorfy am 19.05.2011 um 10:52 Uhr (0)
@cadplay bis zum mittag?! na so kompliziert ist es doch nicht?! quick and dirtyCode: (vlax-for x (setq #SS (vla-get-activeselectionset *AcadDoc*)) (cond ((eq (vla-get-objectname x) "AcDbArc") (setq #Len (+ #Len (vla-get-ArcLength x))) (setq PKT (cdr(assoc 10 (entget(vlax-vla-object-ename x))))) (command "text" PKT "0.375" "" #Len ) ) ((vl-position (vla-get-objectname x) ("AcDbLine" "AcDbPolyline")) (setq #Len (+ #Len (vla-get-Length x))) (setq PKT (cdr(assoc 10 (ent ...
|
| In das Form Lisp wechseln |
|
Lisp : Schnittpunkt ermitteln
CADmium am 04.05.2012 um 08:42 Uhr (0)
Zitat:Original erstellt von cadplayer:vlax-vla-object-ename erstellt doch ein vla-objekt nicht ein Lisp-objekt Bemühe bei sowas doch einfach mal die HILFE im VLIDE !---------Zu deinem Code (davon abgesehen, dass ich ihn gruselig finde .... )nimm doch einfach ne neue Variable .. also stattVLobj (vlax-ename-vla-object en)pt vlax-curve-getClosestPointTo VLobj pt)seg (fix (vlax-curve-getParamAtPoint VLobj pt)) ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des P ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Absturz beim Öffnen von Blöcken
KBB_Ne am 23.09.2004 um 19:41 Uhr (0)
Hallo Forum, ich weiß, das Thema Absturz beim Öffnen von Blöcken wurde schon behandelt. Aber ich frege einfach noch einmal: Gibt es zu dem Bleckeditor von Autodesk keine Alternative? Bei mir (ACAD-Mech, PP6 mit XP) stürzt AutoCAD immer wieder ab. Ich hab mal aus dem Forum einen anderen Blockeditor benutzt, aber auch da war es nicht wirklich besser.... Meine Vorstellung ist eine Lisp, das einen Block anders öffnen kann als der ACAD-Blockeditor??? Geht so was? Gruß KBB ------------------ Gruß KBB
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Verschachtelte Blöcke einfügen
CADwiesel am 23.12.2004 um 08:09 Uhr (0)
ich kann zwar mit deiner Frage nicht allzuviel anfangen, da sie extrem unpräzise gestellt ist, aber trotzdem versuche ich mal etwas: Hol dir mal das Lisp Blockdef_for_load findest du bei mir unter Blöcke. Wenn du damit nicht weiterkommst, kannst du ja deine Frage etwas präziser formulieren. Ich tippe aber mal darauf das der Weg sein müsste: die Zeichnung, die die Blöcke enthält in die aktuelle Zeichnung einfügen und dann alle Blöcke ermitteln, die dann zum einfügen bereitgestellt werden können. ---------- ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : BD-Bezeichnungsvorlage editieren
CAD-Huebner am 11.09.2004 um 07:30 Uhr (0)
Ich hab ehrlich gesagt nicht ganz genau verstanden, was jetzt nach der Konvertierung geht bzw. nicht geht. Geht es hier um Annotations/Kommentare, oder um die Objektverknüpfung selbst. Schildere das Problem noch etwas ausführlicher, wenn du hier Hilfe erwartest. Der Name der Verknüpfungsvorlage wird als EED an die Objekte gehängt. Diese mit Lisp zu manipulieren ist kein Problem. Wesnn es nur darum geht #(#( Feldnamen )) gegen #(Feldnamen) zu ersetzen, schreib einfach eine DXF Datei und ersetze die gesuchte ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : GC10 mit nentsel in
Brischke am 10.07.2003 um 15:07 Uhr (0)
Hallo T. Bürger, so schlimm ist das auch nicht. Folgende Zeilen veranschaulichen das Prinzip. Code: (defun c:TTT (/ pick obj masterobj zpt wie) (arxload geomcal (princ geladen )) (setq pick (nentsel)) (if pick (setq obj (cdr(assoc 10 (entget(car pick)))) masterobj (cdr(assoc 10 (entget(car(last pick)))))) ) (setq zpt(mapcar + obj masterobj) wi (* (/ 180.0 pi)(cdr (assoc 50 (entget(car(last pick))))))) (setq zpt(cal rot(zpt,masterobj,wi) )) (command _.LINE z ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Tabelle RowType ändern
Dorfy am 01.07.2010 um 14:41 Uhr (0)
Zitat:Original erstellt von CADlsp:Jetzt habe ich eine Tabelle mit dem ganzen Excel Inhalt aber alle Reihensind vom Typ Daten, obwohl der "Standard" Tabellenstil dies anders vorsieht.GC280 und gc281 sind gesetzt?nimm die mal raus... dann sollte Zeile 1+2 (bzw 0 und 1) Titel und Kopf acTitleRow and acHeaderRow) enthaltenAber so richtig verstanden hab ich dein Anliegen noch nicht...Ne Beispielzeichnung und deine Systeminfo wäre ggf auch hilfreich------------------Mfg Heiko Elefantenjagd in Afrika "... LISP ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp und dynamische Blöcke
Dirk.B am 01.02.2013 um 10:52 Uhr (0)
Hallo zusammen!Ich hab noch mal was probiert aber leider ohne Erfolg.Code:(defun c:FT()(defun setProperty (vlaDynBlock sPropertyName rValue / vlaProperty) (foreach vlaProperty (vlax-safearray-list (vlax-variant-value (vla-GetDynamicBlockProperties vlaDynBlock))) (if (= (vla-get-PropertyName vlaProperty) sPropertyName) (vla-put-value vlaProperty (vlax-make-variant rValue)) ); end if ); end foreach); end defun(setProperty (vlax-ename-vla-object (car (entsel))) "Strecken1" 50.0))Wenn ich nun einen Block a ...
|
| In das Form Lisp wechseln |
|
Lisp : Gewählte Dateien einfügen
Danillo am 06.06.2022 um 20:46 Uhr (1)
Hallo Leute,ich möchte mehrere dxf-Dateien als Block in eine Zeichnung einfügen, wobei aber der Benutzer die Dateien auf der Festplatte wählen können sollte. Die Anzahl der Dateien kann dabei unterschiedlich sein, d.h. einmal 4, ein anderes Mal z.B. 8.Wäre super, wenn mir jemand einen Tipp geben könnte. Meine Alternative wäre sonst, dass der Dateiname und der Pfad fix vorgeben sind, und ich mit LISP dort die Datein "abhole". Diese Vorgehensweise ist aber sehr eingeschränkt und anfällig auf Fehler/Ungenauig ...
|
| In das Form Lisp wechseln |
