Dim Chiều dài Polyline

[hung1608 8]

Minh có một Polyline gấp khúc. Các bạn có thể viết giúp minh 1 lisp tạo Dim đo được luôn tổng chiều dài Polyline được không

Và khi minh thay đổi chiều dài thì Dim của Polyline cũng sẽ cập nhật chiều dài đó tương ứng

Cảm ơn

[hung1608 8]

Có bạn nào hỗ trợ mình chút.

[alisp 72]

16 giờ trước, hung1608 đã nói:

Minh có một Polyline gấp khúc. Các bạn có thể viết giúp minh 1 lisp tạo Dim đo được luôn tổng chiều dài Polyline được không

Và khi minh thay đổi chiều dài thì Dim của Polyline cũng sẽ cập nhật chiều dài đó tương ứng

Cảm ơn

Xem trong này có gì xài được không, còn vụ cập nhật dài tương ứng thì khó đấy.

 

[cuongtk2 330]

Dim pline zigzag thì không bằng add 1 text vào pline, lấy field độ dài pline gán cho nó. Như vậy sẽ thay đổi khi độ dài pline thay đổi. http://www.lee-mac.com/lisp/html/QuickFieldV1-3.html

[hung1608 8]

Bạn ơi. Cho hỏi mình muốn bỏ ký hiệu Length và các số sau dấu phẩy thì làm thế nào Bạn 

[cuongtk2 330]

Có giải thích từ dòng 136 - 139 đó em. Chịu khó dịch đi.

(defun c:test2 ( ) (LM:QuickField "Length" "%lu2%pr0%ct8[1]" 3))

[hung1608 8]

Em cảm ơn Anh

[betion 10]

Dim pline zigzag thì không bằng add 1 text vào pline, lấy field độ dài pline gán cho nó. Như vậy sẽ thay đổi khi độ dài pline thay đổi.

| day rut nhua

[danhnguyen1004 0]

Dạ lisp hay quá ạ. Em muốn góp ý xíu là mình cho dim pline hàng loạt và hiện text ngay điểm đầu pline được không ạ. Mong các anh chỉ dẫn ạ