snowman.hms
-
Số lượng nội dung
89 -
Đã tham gia
-
Lần ghé thăm cuối
-
Ngày trúng
8
1 Người theo dõi
Khách truy cập Tiểu sử gần đây
2.924 chế độ xem tiểu sử
-
Hint : vlr-insert-reactor First parameter is a VLA-object pointing to the database in which the block is being inserted. ;;----> current database object Second parameter is a string naming the block to be inserted. ;;-----> Name of the block (or clipboard temp file within local->temp folder Third parameter is a VLA-object identifying the source database of the block. ;-----> the source database object (where the block being copied belong to) ** Source database Contains : - Blockname : *Model_Space - Blockname : *Paper_Space - Blockname : _Oblique - Blockname : 2
-
Xin chào bạn, lisp copy view qua máy khác của bạn rất tuyệt, nhưng trong trường hợp máy khác đang không mở cùng file với máy chính nhưng vẫn cùng hệ thống mạng, có cách nào để dòng lệnh này tự mở file đó và view tới view đó luôn ko?
-
ý tưởng copy view từ máy này sang máy khác bằng dòng lệnh
snowman.hms đã trả lời binbin72088@gmail.com trong Chủ đề Sử dụng AutoCAD
(defun c:tt1 (/ cp dx dy p1 p2) (setq cp (getvar "VIEWCTR") dy (* 0.5 (getvar "VIEWSIZE")) dx (* 0.5 (* dy (/ (car (getvar "SCREENSIZE"))(cadr (getvar"SCREENSIZE"))))) p1 (mapcar '- cp (list dx dy)) p2 (mapcar '+ cp (list dx dy)) ) (princ (vl-prin1-to-string (list 'progn (list 'setvar "ctab" (getvar 'ctab)) (list 'setq 'p1 (cons 'list p1) 'p2 (cons 'list p2)) (list 'command ".zoom" "w" 'p1 'p2) ) ) ) (princ) )
