Author Topic: Adding verticies on polyline between points (Read 2034 times)

nobody · « **on:** March 27, 2016, 09:05:20 PM »

Anyone have something already? Or know a way in autocad that will allow me to add vertices to a polyline at a specific distance between two points I select on that polyline? Hope that makes sense.

HasanCAD · « **Reply #1 on:** March 28, 2016, 02:46:50 AM »

I believe this is a good start
http://www.lee-mac.com/addpolyvertex.html

ymg · « **Reply #2 on:** March 28, 2016, 04:10:29 AM »

Alien,

For polyline with straight segment only, I have this:

Code - Auto/Visual Lisp: [Select]

 ;; addvtx      by ymg                                                      ;
   ;;                                                                         ;
   ;;  Will add a vertex to an existing polyline                              ;
   ;;                                                                         ;
   ;; Arguments:                                                              ;
   ;;     en  -  Ename  of a polyline (open or close)                    ;
   ;;      p  -  Point to be added to polyline                                ;
   ;;                                                                         ;
   ;; Notes: For polyline with straight segment only!                         ;
   ;;                                                                         ;
 
 
   (defun addvtx (en p / near par obj)
      (setq obj (vlax-ename->vla-object  en))
           near (vlax-curve-getclosestpointto en p)
            par  (if (zerop (setq par (vlax-curve-getparamatpoint en near))) 0 (1+ (fix par)))            
      )      
      (vlax-invoke obj 'Addvertex par (list (car p) (cadr p)))       
   )
 
 

For a more thorough one there is Gilles Chanteau's here:

http://gile.pagesperso-orange.fr/LISP.html

Look for AddtVtx&DelVtx

ribarm · « **Reply #3 on:** March 28, 2016, 08:49:31 AM »

PLINETOOLS ?

CAB · « **Reply #4 on:** March 28, 2016, 09:14:30 AM »

News:

Author Topic: Adding verticies on polyline between points (Read 2034 times)

nobody

Adding verticies on polyline between points

HasanCAD

Re: Adding verticies on polyline between points

ymg

Re: Adding verticies on polyline between points

ribarm

Re: Adding verticies on polyline between points

CAB

Re: Adding verticies on polyline between points