|
AutoLisp : Verwendete CTB über Lisp auslesen
fuchsi am 31.10.2003 um 09:00 Uhr (0)
tipp zum raussuchen dieser undokumentieretn vla befehle verwende ich folgendes kleines lisp (foreach n1 (atoms-family 1) (if (wcmatch n1 VLA-GET* ) (print n1)) ) listet alle befehle auf die mit VLA-GET beginnen dann die gefundenen befehle in google eingeben, da findet man dann haufenweise beispiele dazu, ist zwar eine mühsame sucherei lohnt sich aber
|
|
AutoLisp : kleines aber feines LISP
fuchsi am 31.10.2003 um 11:13 Uhr (0)
will ich euch nicht vorenthalten oft hat man lisp-ausdrücke, die auf einen fehler auflaufen können gerade wenn man z.B: mit activex arbeitet ich habe mir da eine TRY funktion gescrieben z.B.: (if (not (setq daoobj (vlax-get-or-create-object DAO.DBENGINE.35 ))) (setq daoobj (vlax-get-or-create-object DAO.DBENGINE.36 )) ) (try vlax-invoke (list daoobj OPENDATABASE D: est.mdb )) ergibt t fallse die methode OPENDATABASE erfolgreich ist sonst NIL ; ; Testroutine ergibt nil im Fehlerfall ansonst den ...
|
|
AutoLisp : Anzahl der Attribute einer Zeichnung
fuchsi am 03.11.2003 um 13:57 Uhr (0)
hier 2 kleine lisp programme mit dem einen kannst du attribute per lisp setzten (WriteAttribute (entlast) Myattribut MyNewValue ) das 2. liest dir alle attributte eines eingefügten blockes als assoc-liste aus (GetAllAttributes (entlast)) ergibt (( Attname1 . AttValue1 )( AttName2 . AttValue2 ) ...) also ATTREQ auf 0 setzen, den block per lisp eingügen, und mit (sslenght (GetAllAttributes (entlast))) kriegst du rasu wieviele attribute der block hat ; ; schreibt in einen Block ein Attribut ; (defun ...
|
|
AutoLisp : linientyp erstellen
fuchsi am 03.11.2003 um 15:45 Uhr (0)
ist zwar kein linie sondwern ein textstil habe dein lisp nur um die 100er zeilen ergänzt dann funzt es (entmake (list (0 . STYLE ) (100 . AcDbSymbolTableRecord ) (100 . AcDbTextStyleTableRecord ) (cons 2 test ) (70 . 0) (cons 40 1) (cons 41 1) (50 . 0.0) (71 . 0) (cons 3 arial ) (4 . ) )) ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
|
AutoLisp : rtext in eine lisp einbinden
AsSchu am 06.11.2003 um 12:49 Uhr (0)
Hallo, 1. Frage: wie kann ich den rtext $(getvar,ctab)(Layoutangabe) in verh. klasse lisp einbinden? 2. Frage: Meine Help für EXPRESS ist verschwunden. Kann ich die irgendwie nachladen? Ciao ------------------
|
|
AutoLisp : wer kann mir helfen
Brischke am 12.11.2003 um 09:32 Uhr (0)
Hallo Petra, auf meiner Seite bin ich mit der Aktualisierung etwas im Verzug. Deshalb hier der Link auf die Datei: www.cadlon.de/freedwnload/03_Autolisp.zip Bei Fragen ... Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD NEU: AutoLISP- Projektschulung NEU: Praxisorientierte Schulungen und Workshops durch die bekannten CAD.de Moderatoren AutoCAD, AutoCAD LT, AutoCAD Mechanical, Mechanical Desktop, Architectural Desktop
|
|
AutoLisp : ssget X für Layout und Modell
marvin101010 am 14.11.2003 um 16:01 Uhr (0)
wechsel doch einfach in den entsprechenden bereich, innerhalb der lisp... (if (= LAYOUT1 (cdr (assoc 410.......... (setvar ctab LAYOUT1 ) geht vieleicht auch sauberer aber funzt ------------------ ...so long and thanx for all the fish! [Diese Nachricht wurde von marvin101010 am 14. Nov. 2003 editiert.]
|
|
AutoLisp : Textdatei importieren
Walter Zettlitzer am 17.11.2003 um 10:38 Uhr (0)
Hallo, ich habe bereits ein lisp, mit dem sich Textfiles erzeugen lassen (s.u.). Ich würde mir daraus gerne eins zusammenbauen, welches Text aus Textfiles importiert und in eine Zeichnung einfügt. Beispiel: Ein Textfile enthält nur das Wort Mustertext . Dieses soll am Usprung eingefügt werden. Ich bin für jeden Tip dankbar (Ich habe leider hier in den Foren und bei cadwiesel nichts gefunden)! Schöne Grüße, Walter ;Textfile erzeugen (Auszug): (if (not (setq listnam (findfile Textfile.txt ))) (setq listna ...
|
|
AutoLisp : Textdatei importieren
Walter Zettlitzer am 17.11.2003 um 11:54 Uhr (0)
Hallo cadwiesel, danke, aber dort wird der Weeg ACAD - Textfile beschrieben (dazu habe ich ein Prog), ich benötige den Weg Textfile - ACAD. Ich habe das noch in keinem lisp ghabt, sonst könnte ich es selbst auf meinen Anwendungszweck umbauen/erweitern... ;-) Schöne Grüße, Walter
|
|
AutoLisp : Textdatei importieren
CADwiesel am 17.11.2003 um 12:36 Uhr (0)
naja, der dürfte auch ähnlich sein Kommt darauf an, wie deine Textdatei aufgebaut ist. steht in jeder Zeile nur ein Wert, musst du immer 4 Zeilen auslesen um zu einem zusammengehörigen Eintrag zu kommen (x,y,z, Text) das kannst du umwandeln in eine Koordinate und da den Text einfügen -einfach per command. wenn du Koordinate und text in einer Zeile stehen hast, du fängst an eine Zeile auszulesen dann zerlegst du die ausgelesene Zeile in die Koordinate und den Text und weiter gehts wie schon o.g. ps in mei ...
|
|
AutoLisp : Textdatei importieren
fuchsi am 17.11.2003 um 12:40 Uhr (0)
das könnte mit folgendem kleinem lisp passieren allerdings musst du die zeile (command TEXT ep 2.5 0 text ) anpassen , der wert 2.5 ist die texthöhe des zu erstellenden textes sollte dein aktuelelr textstil bereits fix eine höhe zugeweisen haben, muss die zeile so ausschauen (command TEXT ep 0 text ), damit das fehlerlos funktioniert !! (defun c:txtimp (/) (cond ((setq file (getfiled Textfile einlesen Textfile txt 0)) (setq x (open file r )) (while (setq dat (read-line x)) (setq a1 ...
|
|
AutoLisp : Syntax-Error
fuchsi am 17.11.2003 um 14:04 Uhr (0)
das ist so nicht so leicht zu lösen, stell mal das lisp hier rein dann kann ich die sagen , was du ändern musst ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
|
AutoLisp : activeX und "altes" lisp
fuchsi am 17.11.2003 um 14:10 Uhr (0)
habt ihr auch schon mal bemerkt, wenn man activex-befehle (z.B.: vla-SETXDATA) mit standard lisp (entmake, entget ,..) kombiniert, dass autocad öfters mal mit einem systemfehler crashed (eLockViolation - error) Abhilfe filft hier ein sinmples (Command ._READRAW ) zwischen den einzelnen technologien ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
