Đến nội dung


Hình ảnh
* * - - - 1 Bình chọn

Lisp đếm số bản vẽ autocad đang mở


  • Please log in to reply
4 replies to this topic

#1 conghoangxd037

conghoangxd037

    biết vẽ line

  • Members
  • PipPip
  • 22 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 22 April 2013 - 08:18 AM

Với VBA thì em làm được nhưng lisp thì em không biết có đếm được số bản vẽ autocad đang mở không?


  • 0

#2 Doan Van Ha

Doan Van Ha

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 5447 Bài viết
Điểm đánh giá: 2624 (tuyệt vời)

Đã gửi 22 April 2013 - 08:34 AM

Chắc chắn là được. Nhưng tiêu đề của bạn vi phạm nội quy của box autolisp rồi nên không thể giúp được.


  • 0

* Chỉ nên yêu cầu Lisp khi bạn làm việc đó mất cả ngày nhưng họ chỉ viết 1 giờ. Đừng nêu yêu cầu Lisp khi bạn chỉ làm 1 giờ nhưng bắt họ phải mất cả ngày.

* Nhờ viết lisp cũng như đi khám bệnh. Chỉ gởi căn cước và than sắp chết thì không bác sỹ nào cứu sống được.


#3 Tue_NV

Tue_NV

    KS Võ Quang Tuệ

  • Moderator
  • PipPipPipPipPipPipPip
  • 4296 Bài viết
Điểm đánh giá: 3804 (đỉnh cao)

Đã gửi 22 April 2013 - 08:46 AM

Với VBA thì em làm được nhưng lisp thì em không biết có đếm được số bản vẽ autocad đang mở không?

 

Đây bạn : 

(vla-get-count (vla-get-documents (vlax-get-acad-object)))


  • 0

#4 conghoangxd037

conghoangxd037

    biết vẽ line

  • Members
  • PipPip
  • 22 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 22 April 2013 - 08:54 AM

cảm ơn anh.


  • 0

#5 conghoangxd037

conghoangxd037

    biết vẽ line

  • Members
  • PipPip
  • 22 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 22 April 2013 - 09:55 AM

Nhưng cho em hỏi về cái này xíu nhen anh.Em định viết khi mở bản cad lên thì nó sẽ hiện bản thông báo nếu mở chỉ một bản cad.nhưng em để vào trong acaddoc.lsp thì khi khởi động autocad thì nó không hiểu? mong anh chỉ giáo em phần này cái.

 (if (= (vla-get-count (vla-get-documents (vlax-get-acad-object))) 1) (alert "ok"))


  • 0