Đến nội dung


Hình ảnh
- - - - -

Tạo list cho name UCS


  • Please log in to reply
1 reply to this topic

#1 18011985

18011985

    biết lệnh properties

  • Members
  • PipPipPipPip
  • 255 Bài viết
Điểm đánh giá: 61 (tàm tạm)

Đã gửi 05 August 2010 - 04:40 PM

Mình đang cần tạo một biến là list chứa tên của các UCS . Không biết tạo nó bằng cách nào.
- Ta có 3 toạ độ UCS :
+ 123
+ goc
+ 789
- mình muốn lsp ấn lệnh là lấy được tên các ucs đó cho vào biến.
  • 0
Trăng 16 trăng tròn
Em 16 bụng ... như trăng

Hướng dẫn sử dụng diễn đàn:
Để cảm ơn hay bài viết có ích: Ấn dấu + cuối bài.
Không vừa lòng hay bài spam: Ấn dấu - cuối bài.

#2 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1436 Bài viết
Điểm đánh giá: 1426 (rất tốt)

Đã gửi 06 August 2010 - 07:50 AM

Mình đang cần tạo một biến là list chứa tên của các UCS . Không biết tạo nó bằng cách nào.
- Ta có 3 toạ độ UCS :
+ 123
+ goc
+ 789
- mình muốn lsp ấn lệnh là lấy được tên các ucs đó cho vào biến.

Bạn sử dùng hàm TBLNEXT để truy xuất các table-name trong database.
VD :
(defun GetUcsLst(/ tbl tbl_lst)  
(setq tbl (tblnext "ucs" 1))
(while tbl
(setq tbl_lst (cons (cdr (assoc 2 tbl)) tbl_lst)
tbl (tblnext "ucs")) )
(vl-sort tbl_lst '<))

  • 0