Đến nội dung


Hình ảnh
- - - - -

[Yêu Cầu]lisp thay đổi chiều cao dim


  • Please log in to reply
4 replies to this topic

#1 24h.com.vn

24h.com.vn

    biết zoom

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

Đã gửi 24 July 2012 - 04:47 PM

trên diễn đàn có lisp thay đổi chiều cao text dim http://www.cadviet.c...ao_text_dim.lsp nhưng lisp này cứ hỏi có thay đổi Font chữ và layer chữ k.khi có thì cha thấy thay đổi j ma mất rất nhiều công sứ vậy xin các bác làm giùm lisp thay đổi chiều cao(nghĩa là thay đổi chiều cao của khi đã dim xong chứ k phải thay đổi chiều cao trong dimension nha).Trên diễn đàn cũng có lisp thay đổi nhưng là trong dimension mà công việc của e 1 dim có thể dim nhiều cái với chiều cao khác nhau
  • 0

#2 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5679 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 24 July 2012 - 04:51 PM

1. Bạn hỏi tại topic download. Tất cả những topic mở thêm sẽ chỉ gây nhiễu cho người đọc - người search
2. Dùng bảng thuộc tính để làm những công việc tương tự
  • 1

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#3 24h.com.vn

24h.com.vn

    biết zoom

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

Đã gửi 24 July 2012 - 05:22 PM

1. Bạn hỏi tại topic download. Tất cả những topic mở thêm sẽ chỉ gây nhiễu cho người đọc - người search
2. Dùng bảng thuộc tính để làm những công việc tương tự

k phải e tim r k được moisws post bài chứ có 1 lisp do bác làm là Hdim nhưng lisp đó thay đổi chiều cao cua style dim y e muốn thay đổi chiều cao text dim mà
  • 0

#4 Tue_NV

Tue_NV

    KS Võ Quang Tuệ

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

Đã gửi 24 July 2012 - 09:24 PM

k phải e tim r k được moisws post bài chứ có 1 lisp do bác làm là Hdim nhưng lisp đó thay đổi chiều cao cua style dim y e muốn thay đổi chiều cao text dim mà

Dùng lệnh DIMOVERRIDE (tắt là DOV) đi bạn
Command: DOV DIMOVERRIDE
Enter dimension variable name to override or [Clear overrides]: dimtxt -> gõ dimtxt
Enter new value for dimension variable <100.0000>: 250 -> gõ 250

Enter dimension variable name to override: -> enter

Select objects: Specify opposite corner: 126 found -> Quét (tự lọc) dim

-> Xong
  • 0

#5 pphung183

pphung183

    biết dimstyle

  • Members
  • PipPipPipPipPip
  • 384 Bài viết
Điểm đánh giá: 425 (tốt)

Đã gửi 29 March 2014 - 11:35 AM

Nếu thix lisp dùng theo lệnh DIMOVERRIDE của

Tue_NV thì bạn dùng lisp này nhanh hơn tí ...

 

 

(defun c:hd (/ tH s1)
(command "undo" "be")
(setvar "cmdecho" 0)
(setq tH (getreal "\n Text Height :"))
(setq s1 (ssget (list (cons 0 "DIMENSION"))))
    (command ".DIMOVERRIDE" "dimtxt" tH "" s1 "")
(setvar "cmdecho" 1)
(command "undo" "e")
(princ)
)


  • 0