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

Làm sao để cố định vị trí đường DIM ?

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

Chào các anh ạ. EM cũng mới vẽ CAD thôi, nhiều khi mình move bản vẽ hay làm gì tác động đến đối tượng được DIM thì cái đường DIM đó tự nhảy nhót lung tung khỏi vị trí ban đầu. EM muốn có cái lisp hay biện pháp gì để cố định vị trí cái đường DIM không cho nó nhảy nhót khỏi vị trí khác. Không biết có anh nào có cao kiến gì không ạ ? E đã bit chỉnh trong option cái mục " Make new demention " rồi. Nhưng cái đó không có tác dụng !

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

bạn dùng lệnh DDA chọn tất cả các dim rồi enter la xong. Sau này nếu muốn tình trạng này ko sảy ra hãy vào dimstyle loại bỏ chức năng associate đi là xong... :D

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

THanks anh ! Nhưng e ko tìm thấy tính năng associate trong DIMSTYLE ! a chỉ dẫn chi tiết đường dẫn tới mục có tính năng đó đ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

Chào các anh em trên diễn đàn! Các bạn cho mình hỏi cái lỗi dim này với, mình dim 1 đường thẳng xong rồi, mình nhấp vào chân dim để kéo tới cho đụng đường thẳng thì cái đường dim nó bị xéo theo lúc mình di chuyển chân dim luôn. Có bạn nào biết lỗi này không chỉ mình khắc phục với. Cảm ơn các bạn trước.http://www.cadviet.com/upfiles/6/146654_loidim.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

Đó là dimaligned (lệnh dal), 2 chân dim luôn dài bằng nhau, bạn kéo 1 bên thì dim sẽ di chuyển sao cho 2 chân dài bằng nhau.

Nếu bạn muốn không bị méo thì dùng lệnh dli (dimlinear), nhưng dim nay chỉ theo 2 phương x hoặc y thôi, không dọc theo phương đường thẳng.

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

Chào các anh em trên diễn đàn! Các bạn cho mình hỏi cái lỗi dim này với, mình dim 1 đường thẳng xong rồi, mình nhấp vào chân dim để kéo tới cho đụng đường thẳng thì cái đường dim nó bị xéo theo lúc mình di chuyển chân dim luôn. Có bạn nào biết lỗi này không chỉ mình khắc phục với. Cảm ơn các bạn trước.http://www.cadviet.com/upfiles/6/146654_loidim.dwg

Bạn dùng lệnh DLI để dim đi.file bạn gửi là bạn đang dùng lệnh DAL đó

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
;; DIM RotatedDimension UCS TU THIET LAP THEO HUONG DIM
;; THUC HIEN DIM GIONG CACH DIM BANG DIMALIGNED
;;;;BY TDV
(DEFUN C:RDimension(/  lst-var osmodeod Pt1 Pt2 Pt1X Pt1Y Pt2X Pt2Y)
  (setq lst-var (start-defun lst-var))
  (command "undo" "begin") 
  (setq osmodeod (getvar "osmode"))
  (setvar "cmdecho" 0)
  (command "_.ucsicon" "_off")
  (command "_.ucs" "_w")
  (setq Pt1 (getpoint "Specify first extension line origin:")) 
  (setq Pt2 (getpoint Pt1"\nSpecify second extension line origin:"))
  (prompt "\nSpecify dimension line location or Exit <Exit>:")
  (setq Pt1X (car Pt1))
  (setq Pt1Y (cadr Pt1))
  (setq Pt1 (list Pt1x Pt1Y 0)) ;;;set Z=0
  (setq Pt2X (car Pt2))
  (setq Pt2Y (cadr Pt2))
  (setq Pt2 (list Pt2x Pt2Y 0)) ;;;set Z=0
  (prompt "\nDimension text = ")
  (prin1 (distance Pt1 Pt2)) ;;; In ket qua ra
  
  
  (setvar "osmode" 0)
  (command "_.ucs" "_p")
  (if (and (= (car (trans Pt1 0 1)) (car (trans Pt2 0 1))) (< (cadr (trans Pt1 0 1)) (cadr (trans Pt2 0 1))))
   (command "_.ucs""_3" (trans Pt1 0 1) (trans Pt2 0 1) (polar (trans Pt1 0 1) (+ (DTR 90) (angle (trans Pt1 0 1) (trans Pt2 0 1))) 5))
   (progn
    (if (< (car (trans Pt1 0 1)) (car (trans Pt2 0 1)))
     (command "_.ucs""_3" (trans Pt1 0 1) (trans Pt2 0 1) (polar (trans Pt1 0 1) (+ (DTR 90) (angle (trans Pt1 0 1) (trans Pt2 0 1))) 5))
     (command "_.ucs""_3" (trans Pt2 0 1) (trans Pt1 0 1) (polar (trans Pt2 0 1) (+ (DTR 90) (angle (trans Pt2 0 1) (trans Pt1 0 1))) 5))
    )
   )
  )
  (setvar "osmode" osmodeod)
  (command "_.DIMLINEAR" "non" (trans Pt1 0 1) "non" (trans Pt2 0 1)  pause)
  (command "_.ucsicon" "_on")
  (command "_.ucs" "_p")
  (done-defun lst-var)
  (command "undo" "end")
  (princ)
  )
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; chuyen goc tu Do sang Radian
(defun DTR (A) (* pi (/ A 180.0)))
;;;;;;;;;;------------------THE END-----------------------;;;;;;;;
;;;;kiem-soat-loi-co-the-phat-sinh-khi-nguoi-dung-nhan-esc-de-thoat-lenh
(defun start-defun (lst-var / err)
 (setvar "cmdecho" 0) 
 (vla-StartUndoMark (vla-get-activedocument (vlax-get-acad-object)))
 (setq err *error*
       *error* (lambda (msg)
                (redraw)
                (vla-EndUndoMark (vla-get-activedocument (vlax-get-acad-object)))
                (vl-cmdf "u")
                (setq *error* (car lst-var))))
 (list err (mapcar (function (lambda (x) (list x (getvar x)))) lst-var)));end
 (defun done-defun (lst-var / )
 (mapcar (function (lambda (x) (setvar (car x) (cadr x)))) (cadr lst-var))
 (setq *error* (car lst-var))
 (vla-EndUndoMark (vla-get-activedocument (vlax-get-acad-object)))
 (princ));

Mình copy mỗi nơi 1 tý góp thành, cứ dim như lệnh DAL nhưng sẽ cho ra dim như khi dim dli.

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  

×