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

Xin Lisp Setup Muilti-Plot Trong Layout

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

bác set thế làm gì nhỉ?

chưa hiểu ý định lắm

à vì đó là một yêu cầu trong công việc của mình mỗi khi save file bác ạ. klq nhưng m mới Follow bác trên youtube, bác có serial dạy VB hay nhỉ.

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
;; Copy current layout page setup to all layout tabs
(vl-load-com)
(defun c:CPS (/ Adoc Layts clyt)
  (setq aDoc  (vla-get-activedocument (vlax-get-acad-object))
 Layts (vla-get-layouts aDoc)
 clyt  (vla-get-activelayout aDoc)
  )
  (foreach
     itm
        (vl-remove (vla-get-name clyt) (layoutlist))
    (vla-copyfrom (vla-item Layts itm) clyt)
  )
  (princ)
)

Lượm lặt được, copy từ Page Setup trong Layout hiện hành tới tất cả Layout.

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
;; Copy current layout page setup to all layout tabs
(vl-load-com)
(defun c:CPS (/ Adoc Layts clyt)
  (setq aDoc  (vla-get-activedocument (vlax-get-acad-object))
 Layts (vla-get-layouts aDoc)
 clyt  (vla-get-activelayout aDoc)
  )
  (foreach
     itm
        (vl-remove (vla-get-name clyt) (layoutlist))
    (vla-copyfrom (vla-item Layts itm) clyt)
  )
  (princ)
)

Lượm lặt được, copy từ Page Setup trong Layout hiện hành tới tất cả Layout.

 

cảm ơn bác, nhưng sao m load vào gõ lệnh mà nó ko chạy nhỉ.

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

LISP đạ chạy được ạ, sau khi e reload mấy lần,mặc dù còn hơi manual một tí nhưng dù sao cũng  cảm ơn bác  dinhvantrang 

đã trợ giúp ạ,

 

nếu có thể, b có thể chèn thêm cho m hai yêu cầu

- toàn bộ viewport được "zoom out" tương tự như khi nhấn doublé-scroll

- chuyển view hiện tại thành viewport ở vị trí thứ 2, tên "Finish" được ko ạ.

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  

×