Chuyển đến nội dung
Diễn đàn CADViet
Đăng nhập để thực hiện theo  
huunhantvxdts

[yêu cầu] Tạo các list(text) nằm trong các pline khác nhau

Các bài được khuyến nghị

Nhờ mọi người giúp đỡ viết cho tôi 1 lisp tạo các list chứa các đối tượng text nằm trong các pline khác nhau (các text trong 1 pline tương ứng với 1 list chứa nội dung text) mục đích của việc này là tôi chuyển các text qua excell về 4 cột

file yêu cầu

http://www.cadviet.com/upfiles/3/66960_yeu_cau.dwg

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Yêu cầu của bạn khó hiểu quá. Bạn diễn đạt như vậy thì không ai giúp bạn nổi đâu.

ý mình làm sao xác định được những text nào nằm trong 1 vùng kín như ý của Bác Phanthanhbinh ở diễn đàn #3

http://www.cadviet.com/forum/index.php?showtopic=67275

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nôm na như này

 
(setq plst (acet-geom-vertex-list dt))
(setq SS (ssget "wp" plst  (list (cons 0 "text"))))

Trong đó dt là cái pline (không chứa đoạn cong)

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nôm na như này

(setq plst (acet-geom-vertex-list dt))
(setq SS (ssget "wp" plst  (list (cons 0 "text"))))

Trong đó dt là cái pline (không chứa đoạn cong)

Bạn có thể viết cho mình lệnh gán pline vào biến dt, chứ mình làm hoài mà không được

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Ví dụ lệnh xtpl sẽ xóa toàn bộ đối tượng là text nằm trong pline.

 
(defun c:xtpl ()
(setq dt (car (entsel "\nChon curve:")))
(setq SS (ssget "wp" (acet-geom-vertex-list dt)  (list (cons 0 "text"))))
(command ".erase" ss "")
)

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Ví dụ lệnh xtpl sẽ xóa toàn bộ đối tượng là text nằm trong pline.

(defun c:xtpl ()
(setq dt (car (entsel "\nChon curve:")))
(setq SS (ssget "wp" (acet-geom-vertex-list dt)  (list (cons 0 "text"))))
(command ".erase" ss "")
)

Cám ơn bạn nhiều!!

giờ mới hiểu gán đối tượng vào biến chứ mình về mày mò cả buổi mà không ra được

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

Đăng nhập để thực hiện theo  

×