Markieren Sie die Vertiken einer Polylinea

[pepsko]

kennt jemand eine methode oder eine lispe zu markieren (z.b. mit punkten) die vertiken einer polylinie? oder können sie den griff sehen, ohne die polylinie auszuwählen?
danke.

 

[PlannerRoad]

dies ist eine lippe, um kreise in der oberseite eines polylinea einzufügen:

;;add to 3' dia. kreis an jeder scheitel einer pline
;jeff mishler darf 2006
(defun c:circlevtx (/ent und idx pt ss totparam rot)
(Fälle (setq ss (ssget '(0. "*poly*"))
(Prog.)
(vla-startundomark (vla-get-activedocument))
(setq idx -1)
(setq idx (1+ idx))
(setq ent (Name ss idx))
(setq totparam (fix (vlax-curve-getendparam ent))
i)
r (getvar "circlerad")
(if (= r 0,0)
 [COLOR="Red"](setq r 1.5); standardradius einstellen hier[/COLOR])
(setq i (1+i)) totparam
(setq pt (vlax-curve-getpointatparam ent i))
(entmake)
(cons 10 pt)
(cons 40 r)
(Cons 8 "Circlelayer"); gestern die schicht einstellen
)
)
)
(setq pt (vlax-curve-getpointatparam ent (vlax-curve-getendparam ent))
(entmake)
(cons 10 pt)
(cons 40 r)
(Cons 8 "Circlelayer"); gestern die schicht einstellen
)
)
)
(vla-endundomark (vla-get-activedocument))
)
)
(principal)
)

ich habe die lippe von qui.
der kreisradius kann variiert werden, wo rote zeichen sind.

 

[pepsko]

vielen dank. ich hoffe, ich kann zurück.

 

[PlannerRoad]

die lispe wurde modifiziert durch gp. in diese seite, um in die oberseiten einer polylinie die punkteinheiten anstelle der kreise einzufügen.