|
AutoLisp : INI-Datei schreiben / lesen
fuchsi am 19.11.2003 um 09:35 Uhr (0)
ich hab mir da eine activeX Dll geschrieben, die ich dir zur verfügung stellen kann die dll einfach ins winntsystem32 kopieren und registrieren dann hast du folgende neuen befehle (setq actools (vlax-get-or-create-object acadtools.tools )) (vlax-invoke actools StartApplication notepad ) (vlax-invoke actools ReadIni Section Entry Default IniFile) (vlax-invoke actools WriteIni Section Entry Value IniFile) (vlax-release-object actools) mit vlax-get-or-create-object wird das objekt instanziert (vlax ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : activeX und "altes" lisp
fuchsi am 19.11.2003 um 14:07 Uhr (0)
hab noch mal rumgetestet, passiert anscheinend nur wenn man im layoutbereich mit vla-put.. vla-set... in kombination mit entget, entmod entmake befehlen arbeitet ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
| In das Form AutoLisp wechseln |
|
AutoLisp : trotz fehler das programm fortsetzen
fuchsi am 21.11.2003 um 09:22 Uhr (0)
probier mal folgendes ich habe mir eine TRY-Funktion geschrieben, die im fehlerfall nicht abbricht, sonder NIL zurückgibt. wenn du jetzt dein command insert in eiene eigen sub gibst, kannst du dann , diesen fehler mit ESC mit meiner TRY-funktion abfangen ; hauptfunktion (defun c:test (/) (cond ((try insertblock (list 1 )) (alert OK )) (t (alert ABBRUCH )) ) (alert fertig ) ; zum testen obs wirklich weietergeht ) ; funktion zum einfügen des blockes (defun insertBloc ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : block erstellen
fuchsi am 21.11.2003 um 11:27 Uhr (0)
dir fehklt der gc 70 (entmake (list (0 . block ) (8 . 0 ) (100 . AcDbBlockReference ) (2 . test ) (cons 10 (list 0 0 0)) (70 . 0) ) );entmake ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
| In das Form AutoLisp wechseln |
|
AutoLisp : block erstellen
fuchsi am 21.11.2003 um 13:14 Uhr (0)
(setq ss (ssget)) (entmake (list (cons 0 block ) (cons 8 0 ) (cons 100 AcDbBlockReference ) (cons 2 test ) (cons 10 (list 0 0 0)) (cons 70 0))) (setq i1 0) (repeat (sslength ss ) ; alle elemente des auswahlsatzes durchlauf. (setq ename (ssname ss i1)); und im block neu erstellen (setq edate (entget ename)) (entmake edate) (setq i1 (1+ i1)) ) (entmake (list (cons 0 endblk ))) ...
|
| In das Form AutoLisp wechseln |
|
Lisp : VRML export
fuchsi am 21.11.2003 um 13:44 Uhr (0)
hallo ich bin gerade dabei einen VRML exporter zu schreibendazu mache ich vom volumenkörper einen 3dsoutimportieren das ganze wieder in eine zeichnung , und habe damit lauter 3ecks-flächen , die ich relativ leicht in eine vrlm-dateials IndexedFaceSet rausschreiben kann.nur gefällt mir die methode mit 3dsout und 3dsin nicht. weiss wer eine andere methode , umd volumenkörper in flächenkörper zu wandeln ?leider sind ja die element-daten von den volumenkörper, regionen und bodys nicht gerade lesbar (verschlüss ...
|
| In das Form Lisp wechseln |
|
Lisp : VRML export
fuchsi am 22.11.2003 um 10:01 Uhr (0)
@vmichlden vrml export von xanadu hab ich schon probiert. der kann eigentlich das gleiche, was ich mit 3dsout, 3dsin und export des pnetz mache.@cadwomendanke für den linküber das o2c bin ich auch schon gestossen, werde es mir auch mal genauer anschauen, da ich unsere artikel (büromöbel) auch für arcon bereitstellen soll.------------------***********************************************AutoCad 2000i, 2002, 2004 deutsch und englischWindows 2000, NT, XP
|
| In das Form Lisp wechseln |
|
Lisp : VRML export
fuchsi am 22.11.2003 um 10:32 Uhr (0)
kurz erklärt was ich möchtewir haben ca. 40.000 verkaufsbare artikel (büromöbel)da es zu aufwendig ist, für jeden artikel eine cad-zeichnung zu erstellen, sind diese artikel in ihre bestandteile zerlegt.so habe ich z.B.: eine bibliothek mit allen verschiedenen tischplatten, eine mit allen verschiedenen gestellteilen usw.wenn nun ein planer einen schreibtisch konfiguriert (z.B: er bestimmt die plattenform, die tischbreite, höhe gestellart usw.) wird der schreibtisch zur laufzeit aus diesen einzelteilen laut ...
|
| In das Form Lisp wechseln |
|
Lisp : VRML export
fuchsi am 24.11.2003 um 10:19 Uhr (0)
@cwleider ist im PM nichts drinPrivate-Messages: 0 neue Nachrichten, 0 Nachrichten insgesamt. funktioniert da was nicht ??------------------***********************************************AutoCad 2000i, 2002, 2004 deutsch und englischWindows 2000, NT, XP
|
| In das Form Lisp wechseln |
|
AutoLisp : schnittpunkt fläche mit linie
fuchsi am 24.11.2003 um 13:26 Uhr (0)
ich habe folgendes problem ich habe 3 beliebige 3D-Punkte. diese 3 Punkte beschreiben eine Fläche im Raum. ich möchte nun herausfinden an welchem punkt diese fläche (unendlich vergrössert vorgestellt) die X-Achse, die Y-Achse und die Z-Achse schneiden hat da jemand eine idee ?? ich habs schon probiert wirkliche flächen zu zeichnen , und diese mit linien entlag de x,y,z achse über die methode IntersectWith zu schneiden. funktioniert aber anscheinend nicht mit 3dflächen ------------------ ******************* ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : schnittpunkt fläche mit linie
fuchsi am 24.11.2003 um 14:28 Uhr (0)
jetzt arbeite ich schon seit 12 Jahren mit LISP aber den geometrie rechner habe ich noch nie verwednet und es funktioniert danke danke danke danke ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
| In das Form AutoLisp wechseln |
|
AutoLisp : rektoren
fuchsi am 25.11.2003 um 08:36 Uhr (0)
VLR-REMOVE VLR-REMOVE-ALL siehe Hilfe-datei ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP
|
| In das Form AutoLisp wechseln |
|
AutoLisp : rektoren
fuchsi am 25.11.2003 um 09:37 Uhr (0)
du weist deine reaktoren einer globalen variable zu z.B: (setq MyReaktoren (vlr-editor-reactor nil ((:vlr-commandWillStart . AHC_BNCommandWillStart) (:vlr-commandEnded . AHC_BNCommandEnded) (:vlr-commandCancelled . AHC_BNCommandEnded) (:vlr-lispCancelled . AHC_BNlispCancelled) (:vlr-lispWillStart . AHC_BNLispStart) (:vlr-lispEnded . AHC_BNlispCancelled) ) )) dann kannst du die über diese variable wieder zerstören (vlr-remove MyReaktoren) ------------------ **************** ...
|
| In das Form AutoLisp wechseln |
