|
AutoLisp : Koordinateneingabe bei (command "_offset")...
Schachinger am 12.12.2003 um 11:11 Uhr (0)
hallo fuchsi! erstmal danke für dein posting - mit end/startpunkt und winkel funktioniert es - DANKE was ich jedoch noch immer nicht verstehe ist warum es mit meiner variante nicht funktioniert. denn ich lege zufür im lisp mit (command _ucs _obj en) das BKS auf die Linie - das heist X-Achse verläuft in Richtung der Linien-Achse. Usprung liegt am Anfangspunkt. dann müssten mit den Abständen 0,1 und 0,-1 ja auch die linien richtig versetzt werden? außerdem wirds bei den bögen dann kompliziert *G* kan ...
|
|
AutoLisp : action_tile
fca_mi2 am 16.12.2003 um 12:25 Uhr (0)
hier die dcl : fc_kaefig : dialog { label= Käfig bauen ; :row{ :boxed_column{ :edit_box { key = DCLEdit1 ; label = Abstand in x-Richtung ; value = 0 ; edit_width = 3 ; height = 0.9 ; } : button { key = DCLButton1 ; label = x Einfügen ; width = 10.0 ; height = 2.1 ; is_tab_stop = false ; } ...
|
|
AutoLisp : action_tile
fuchsi am 16.12.2003 um 12:44 Uhr (0)
bin mir nicht ganz sicher , aber du müsstest im action-tile den parameter $REASON deiner lisp-funktion mitgegen, der ist soweit ich noch weiss bei verlassen eines eingabefeldes mit tab oder maus den wert 2 bei enter den wert 1 in etwa so: (action_tile MeineEingabeBox (MeinLispFuerEingabe $REASON) ) und im lisp den wert abprüfen, nur bei 1 die liste aktualisieren sonst häng dochmal ein print rein , um die variable zu prüfen ------------------
|
|
AutoLisp : action_tile
fuchsi am 16.12.2003 um 12:55 Uhr (0)
hab jetzt erst gesehen, dass du dein lisp und dcl gepostet hast im action_tile ergäntzt du folgendermassen (action_tile DCLEdit1 (x_einfueg $REASON) ) un im aufgerufenem programm prüfst du den übergebenen wert (defun x_einfueg ( wie /) (cond ((= wie 1) ; mit enter .... nur hier soller weietrtun ------------------
|
|
AutoLisp : action_tile
fuchsi am 16.12.2003 um 13:03 Uhr (0)
noch ein tipp ich würde die 3 unterprogramme x-einfueg y-einfueg und z-einfueg zusammenlegen auf ein programm in etwa so (action_tile DCLEdit1 (einfueg $REASON $value $key) ) (action_tile DCLEdit2 (einfueg $REASON $value $key) ) (action_tile DCLEdit3 (einfueg $REASON $value $key) ) und zum testen (defun einfueg ( wie wert wer / ) (print wie) (print wert) (print wer) ) mit $REASON bekommst du wie der event zustandekam mit $VALUE bekommst du den inhalt des eingabefeldes mit $KEY bekommst du w ...
|
|
AutoLisp : Lisp für Speichern von ACAD 2004 auf 2000
fuchsi am 17.12.2003 um 09:03 Uhr (0)
ich würd das lisp gleich lassen, und im konfig-dialog einstellen, dass autocad2004 generell im 2000er format speichern soll. diese einstellung empfiehlt sich generell, solange man mit versch. versionen in einer firma arbeitet. obwohl man dabei die vorteile des abgespeckten 2004-formates verliert. das einzig was schade ist, dass der befehl WBLOCK diese einstellung nicht benutzt. (meiner meinung nach nicht sehr konsequent durchgezogen von seiten adesk) ------------------
|
|
AutoLisp : action_tile
fca_mi2 am 17.12.2003 um 10:13 Uhr (0)
vielen dank nochmals, habe heute und gestern wieder eine menge grundlagen über lisp gelernt . ich hoffe, die unities haben euch erreicht ! ------------------ MfG Frank
|
|
AutoLisp : Koordinaten Ansichtsfenster / Modell
spider_dd am 22.12.2003 um 11:12 Uhr (0)
Hi Georg, ich glaube ich habe inzwischen die Lösung gefunden!! Trotzdem danke für die Antwort! Das Programm ele von Reini Urban berücksichtigt nicht eine ggf. vorhanden Verschiebung der Koordinatensysteme. Die zugehörigen Werte habe ich im GC 17 bzw. in den eed unter 1010 gefunden! (ein gefühl wie ostern so kurz vor weihnachten :-)) Ich hänge die alte und neue lisp (ele.lsp ele_neu.lsp) und eine test.dwg mal mit ran. Im Layout 2 ist das störrische Ansichtsfenster Viele Grüße spider
|
|
AutoLisp : Textausrichten
spider_dd am 26.12.2003 um 23:06 Uhr (0)
Hallo vision, wie das rücksetzen einer noch vorh. Auswahl im lisp geht, weis ich auch nicht (besser vorher löschen), die schleife sollte so funktionieren: (defun c:li() (setq ct nil ctl nil) (setq weiter 1) (while weiter (setq ctl (ssget )) (if (= ctl nil) (setq weiter nil) (progn (setq anz (sslength ctl)) (setq x 0) (while ( x anz) (setq ct (entget (ssname ctl x))) (if (= (cdr (assoc 0 ct)) TEXT ) (progn (setq ct (subst (cons 72 ...
|
|
AutoLisp : Text kopieren und ändern
Dober Heinz am 08.01.2004 um 12:35 Uhr (0)
Hallo Kann mir wehr helfen habe ein lisp das text kopiert und gleich ändert. (defun c:kota (/ a) (command _.copy (setq a (car(entsel))) (cdr(assoc 10 (entget a)))(getpoint Einfügepunkt: )) (command _.ddedit (entlast)) ) aber ein ich dein text anklicke fängt er einen punkt irgentwo nur nicht dein text was hat es da Danke für Antwort Heinz ------------------
|
|
AutoLisp : Text kopieren und ändern
fuchsi am 08.01.2004 um 13:04 Uhr (0)
wenn man in lisp Command verwednet, die mit Punkten arbeiten, muss man dabei aufpassen, dass ein eventuell eingeschalteter Objektfang genauso zu tragen kommt. hast du z.B.: objektfang END eingestellt, kann es sein, dass der Von-Punkt im command _copy der endpunkt einer angrenzenden linie ist. ------------------
|
|
AutoLisp : MLI DateiBeschreibung
fuchsi am 08.01.2004 um 16:04 Uhr (0)
Hallo ! hat zwar nicht wirklich was mit lisp zu tun, aber hier sind ja die meisten acad-programmierer zu hause. hat jemand eine datei-beschreibung der MLI files habe inzwischen schon einiges selbst gefunden der aufbau ist mehr oder weniger in sog. chunks struktriert ein chunk besteht aus einem WORD mit der chunk-id , einem DWORD mit der Länge in Byte eventuell Unter -chunks und dem eigentlichem Wert ich kenne auch die meisten chunks mittlerweise A000 Material Name A010 RGB-Wert Umgebungsfarbe A020 RGB-Wer ...
|
|
AutoLisp : Attributinformationen austauschen
marvin101010 am 13.01.2004 um 18:34 Uhr (0)
also... erstmal müsste man wissen ob es sich um attribute oder um attributsdefinitionen handelt. soll heissen...sind sie in einem block eingebunden oder nicht. ich geh mal davon aus, dass ja! sonst macht das ja nicht so viel sinn. dann: habt ihr so wenig kunden, dass man für jeden ein icon anlegen kann? was ist bei sich ändernden kundendaten...so wie du deinen wunsch beschreibst, scheint mir das eine sehr starre sache zu sein. wenn du allerdings wirklich nichts weiter willst als einen button für jeden kun ...
|
