|
AutoLisp : Bemassung
joern bosse am 11.05.2005 um 10:55 Uhr (0)
Hallo, ich denke die Variableneinstellung von DIMEXO ist nicht das Problem, den das ist ja nur der Abstand vom zu vermasssenden Objekt zur Hilslinien selbst. Die Hilsfslinie soll aber wohl eine fest Länge bekommen. Ich würde da einfach den Anfangspunkt der ersten und zweiten Hilfslinie um ein variables Maß verschieben, so daß die Hilfslinien immer die gleiche Länge hat. probiert habe ich es mal aber das klappt nur bei gedrehten Bemassungen, ist nur ein Gedankenansatz, mehr nicht. (defun c:test ( / ent def1 ...
| | In das Form AutoLisp wechseln |
|
Lisp : text konstant verschieben
joern bosse am 08.10.2009 um 08:44 Uhr (0)
Hallo CAD-Player,ich würde folgendermaßen beginnen:1. Text und Polylinie auswählen2. Koordinatenliste aus LWPOLYLINE oder POLYLINE3. Basispunkt des Textes (GC 10)4. Koordinatenliste sortieren nach kleinsten Abstand zu Textbasispunkt (so kann es aber auch sein, das der Text an einen Stützpunkt innerhalb der Poly "rangezogen wird"5. Textbasispunkt ändern (1. Punkt der sortierten Koordinatenliste)6. Layer Poly ändernCode:(defun c:test ( / BASIS_TEXT KOORD_POLY OBJ_POLY OBJ_TEXT)(if (and (setq obj_text(car(ent ...
| | In das Form Lisp wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |