|
Lisp : Xrefs in der DWG binden
RoyCAD am 26.10.2009 um 16:07 Uhr (0)
Halloich möchte eine DWG per Lisp öffnen (so wie im Designcenter)und dann die Xrefs in der dwg binden.Funktioniert nicht so ganz. Ich bin kein AktivX Held und ich bin mir nicht sicher ob das geht, jedoch für Untersützung bin ich sehr dankbar. (setq strFile "D:Test.dwg") (setq erg (getvar "ACADVER")) (cond ((= erg "15.0") (setq strDBX "ObjectDBX.AxDbDocument")) ((= (substr erg 1 4) "17.1") (setq strDBX "ObjectDBX.AxDbDocument.17")) ((= (substr erg 1 4) "17.0") (setq strDBX "ObjectDBX.AxDbDocument.17")) ...
| | In das Form Lisp wechseln |
|
AutoLisp : kompakte Lisp Code
RoyCAD am 15.03.2005 um 09:51 Uhr (0)
Hallo Kann man dieser Code bearbeiten, weil jetzt ist das eine Endlose Geschichte. Ich denke es ist doch möglich das Ding viel kürzer zu schreiben. Für ein Beispiel werde ich sehr dankbar. Mit freundlichen Grüßen RoyCAD (setq bock_seit_an1 (polar (setq startbock_an (getpoint Startpunkt )) 0.0 (- (+ (+ (+(-(* b1 (sqrt 2.0))9.95 )2.9) (* b2 (sqrt 2.0))) (+ (* Breite_3 (sqrt 2.0)) 4.0)) 5.4) )) (setq bock_seit_an2 (polar bock_seit_an1 w45 (* 5.4 (sqrt 2.0)))) (setq bock_seit_an3 (polar bock_ ...
| | In das Form AutoLisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |