|
AutoLisp : Lisp stürzt ab seit AutoCad2005
CADmium am 25.11.2004 um 15:01 Uhr (0)
denke mal (command "aimdUpdateAllTitleblocks") ist keine Autocad-funktion .. kommentier die mal aus ... ansonsten mal so ne commandzeile in der Befehlszeile durchspielen ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bearbeitungszeit ändern
CADmium am 25.11.2004 um 23:01 Uhr (0)
Hier mal 2 Routinen, wie es gehen sollte: (defun c:GET-BEARBEITUNGSZEIT(/ DICT PROPS ZEIT STUNDE MINUTE SEKUNDE) (if(and (setq DICT (dictsearch (namedobjdict) "DWGPROPS")) (setq PROPS (entget(cdr(assoc -1 DICT)))) (setq ZEIT (cdr(assoc 40 PROPS))) ) (progn (setq TAGE (fix ZEIT)) (setq ZEIT (* 24.0 60 60 (- ZEIT TAGE))) (setq ZEIT (+ ZEIT 0.0005)) (setq STUNDE (fix (/ ZEIT 3600.0))) (setq MINUTE (fix (/ (- ZEIT (* STUNDE 36 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Kurzer Dateiname mit Zeichen ~
CADmium am 09.12.2004 um 10:13 Uhr (0)
auf XP liefert ein (vlax-dump-object (setq FSO(vlax-create-object "Scripting.FileSystemObject")) T) folgende Liste : ; IFileSystem3: FileSystemObject ; Eigenschaftswerte: ; Drives (RO) = # VLA-OBJECT IDriveCollection 003f74a8 ; Unterstützte Methoden: ; BuildPath (2) ; CopyFile (3) ; CopyFolder (3) ; CreateFolder (1) ; CreateTextFile (3) ; DeleteFile (2) ; DeleteFolder (2) ; DriveExists (1) ; FileExists (1) ; FolderExists (1) ; GetAbsolutePathName (1) ; GetBaseName (1) ; GetDri ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Wechseln ins Layout
CADmium am 08.02.2006 um 13:52 Uhr (0)
auf deutsch:(SetVar "CTAB" "Layout1") ; Fehler: Einstellung für AutoCAD-Variable zurückgewiesen: "CTAB" "Layout1"kannst dir ja auch mal den Beitrag angucken------------------ - Thomas -"Du bist einen uns unbekannten Weg in eine andere Form des Seins gegangen. - Wir sehen uns wieder in deinem Paradies! - Tschüß Axel.."
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Programmstart beim Zeichnungsschliessen
CADmium am 21.12.2004 um 09:54 Uhr (0)
Das Ereignis "Beenden einer Zeichnung" kann man mit einem Reaktor abfangen, in dem dann das Proggi gestartet werden müßte. Darin darf aber kein command ect. verwendet werden und eine andere Möglichkeit Externe Programme aus Autocad zu starten ist mir nicht bekannt. Oder gehts dir um ein Lisp, das gestartet werden soll ? ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Command
CADmium am 14.01.2005 um 10:55 Uhr (0)
OK: einen kleinen: nach der Analyse der Datei overkill.lsp , die Datei overkillsup.lsp öffnen .. die Argumente der Funktion acet-overkill2 angucken und diese dann in deiner LSP mit der entsprechenden Liste ( - alst ) aufrufen. ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : RGB -> ACI
CADmium am 08.02.2005 um 12:50 Uhr (0)
Frage: Wie rechnet ACAD RGB-Farben in AutocadColorIndex-Farben um? Mit activX kann man ja auf folgende Möglichkeit zurückgreifen: (defun DT:COLOR-RGB- ACI ( RGB / COLOROBJ ACI ) (if(and (=(type RGB) LIST)(=(length RGB)3) (setq COLOROBJ (vla-getinterfaceobject (vlax-get-acad-object) AutoCAD.AcCmColor.16 ) ) (not(vl-catch-all-error-p (vl-catch-all-apply ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Visual Lisp
CADmium am 01.03.2005 um 19:29 Uhr (0)
Bitte: (defun Test (DWGNAME / DWG) (if;vorhandene Datei (or(not(vl-catch-all-error-p (setq DWG(vl-catch-all-apply vla-open (if (=(getvar SDI )1) (list (vla-get-Activedocument(vlax-get-acad-object)) DWGNAME ) (list ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ARX-Datei von ACAD2002 nach ACAD2000
CADmium am 09.03.2005 um 08:30 Uhr (0)
unwahrscheinlich, aber Versuch, macht kluch .. Laytrans läßt sich aber auch mit einem Normalo Lisp realisieren.. ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Hilfe lisp Programm
CADmium am 14.03.2005 um 21:07 Uhr (0)
Hallo elesta! Wenn du dich in Lisp einarbeiten willst, kann ich dir Mapcars Tutorial wärmstens empfehlen. Hier wird eine im deutschsprachigen Raum wohl einmalige Einführung in die Programmiersprache Lisp , speziell für AutoCad gegeben. Bist du des englischen mächtig, und schon etwas weiter fortgeschritten, kannst du dir auch einmal www.afralisp.com angucken. ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lös ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : rueckgabewert von acad befehl in variable
CADmium am 18.03.2005 um 21:27 Uhr (0)
Zitat: Original erstellt von 1.krid: Bin blutiger Anfaenger... Kann mir jemand ein Tutorial (kein Buch) empfehlen, dass fuer den Einstieg in Lisp geeignet (und nicht ungeeignet, wie viele, die ich schon gesehen hab) ist? ich zitier mich mal selber .. Wenn du dich in Lisp einarbeiten willst, kann ich dir Mapcars Tutorial wärmstens empfehlen. Hier wird eine im deutschsprachigen Raum wohl einmalige Einführung in die Programmiersprache Lisp , speziell für AutoCad gegeben. Bist du des englischen ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : rueckgabewert von acad befehl in variable
CADmium am 21.03.2005 um 13:29 Uhr (0)
@SEBZ: mal aus der Lisp-Hilfe zitiert : (command [arguments] ...) Arguments: AutoCAD commands and their options. The arguments to the command function can be strings, reals, integers, or points, as expected by the prompt sequence of the executed command. A null string ( ) is equivalent to pressing ENTER on the keyboard. Invoking command with no argument is equivalent to pressing ESC and cancels most AutoCAD commands. The command function evaluates each argument and sends it to AutoCAD in response to su ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Pfad einer Datei ermitteln
CADmium am 23.03.2005 um 09:48 Uhr (0)
Zitat: Original erstellt von CADwiesel: sowas ist leider Grundsätzlich mit Lisp/Vlisp nicht möglich. Doch ist es, muß man sich bloß ein erweitertes findfile kreieren.. Hilfreich sind dabei u.a: mit rekursiven Aufruf von (vl-directory-files FOLDERNAME *.* -1) eine Verzeichnisbaumliste erstellen(der Erste Aufruf erfolgt mit dem entsprechenden LW-Buchstaben) und die dann mit (findfile(strcat FOLDER DATEINAME) abarbeiten. Die Existiereden LW bekommt man mit dem FSO-Objekt : (setq FSO (vlax-create-ob ...
|
| In das Form AutoLisp wechseln |
