|
AutoCAD VBA : Block verschieben
rexxitall am 08.06.2013 um 16:01 Uhr (0)
untested sub move_JCdim e as acadentitydim P(2) as doubledim i as longdim b as acadblockreferencefor each entity in thisdrawing.modelspace alles durchwuehelnif lcase(entity.objectname)="acdbblockreference" then is sich block set b=entity mussu machen doofe entity pointer zu block pointerif lcase(b.name)="josef" then hassu nun volle doenerrotweissfor i=0 to 2 kriegstu block koordinatenp(i)=b.insertationpoint(i) nextvoll krass koordinatenp(0)=p(0)-1 one step to the left (c) Frank N furtherb.insartationpoint ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Bogen, Linie, PL Länge Delta
rexxitall am 06.10.2022 um 14:29 Uhr (1)
Polylinie ist nicht ganz so einfach. Du musst die Koordinaten der Linie durchlaufen und herausbekommen um welches Segment es sich handelt. Die kann übrigens links oder rechts rum sein... Dann strecken und alle anderen (nachfolgenden) Punkte auch mit dieser Verschiebung beaufschlagen. Ob ein Polygon links oder rechts rum dreht bekommt man mit dem Vorzeichen der Flächenberechnung nach Gauss heraus. Thema Bulgen. Dreht man die Drehrichtung um, müssen die Bulgen angepasst werden. Vorzeichen und ggf. um eineste ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Rotated Dimension via Lisp auslesen
rexxitall am 26.01.2016 um 10:20 Uhr (1)
Hi, ich bin kein Lispler, Ich hab auch noch coe rumfliegen der Lisp direkt aufruft, muss nicht über die Uservars sein Mir gehen die Maßketten von Acad seit ewig auf den Zünder, das was die haben ist Steinzeit, das konnte Zeicon vor 30 Jahren schon besser. Ich will Masskettenzüge als ganzes anordnen, erzeugen, verschieben, Maßketten zusammenfassen, aufsplitten...Sprich mir endlich mal die Bemaßungsfunktionen bauen die ICH haben will seit 10 Jahren Geht alles na klar auch so ... Mit endlosem Zeitaufwand.Der ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
