dim kích thước chênh lệch

[vỹnguy 1]

mọi người cho em hỏi làm cách nào để dim nhanh kích thước chênh lệch giữa đường thực tế  và đường thiết kế ạ

[limfx 32]

Đường thực tế là đường nào? Đường thiết kế là đường nào bạn?

 

[cuongtk2 399]

Là  đường để tính khối lượng phát sinh giữa thực tế và thiết kế. Trên bản vẽ hoàn công, thể hiện trên trắc ngang. Có lẽ 2 đường này sẽ có số grip point (node) như nhau.

[vỹnguy 1]

https://drive.google.com/file/d/1jXDzq7HjfCZVlWKCmbJAf7NU9dKdNXeE/view?usp=sharing

dạ ví dụ như này ạ

[cuongtk2 399]

Nó đây 

(defun c:test ( / ENT1 ENT2 LS MSPACE PLINETK PTDICH)
(setq ent1 (car (entsel "\nPline thi cong:"))
      ent2 (car (entsel "\nPline thiet ke:")))
  (if (not (and ent1 ent2)) (exit))
  (setq  plinetk (vlax-ename->vla-object ent2))
(setq mspace (vla-get-modelspace (vla-get-activedocument 
              (vlax-get-acad-object))))

(setq ls (ACET-GEOM-PLINE-POINT-LIST  ent1 nil))
(foreach pt ls
  (setq ptdich (vlax-curve-getclosestpointto plinetk pt))
  (vla-AddDimAligned mspace (vlax-3d-point pt)
                     (vlax-3d-point ptdich)
                     (vlax-3d-point ptdich)
                     )
  )
  )

 

[vỹnguy 1]

Dạ em cảm ơn ạ