Đến nội dung


Hình ảnh
5 stars - based on 24598 reviews
- - - - -

[yêu cầu] Lisp thay đổi chiều cao text của dimstyle cực nhanh !


  • Please log in to reply
47 replies to this topic

#41 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 01 June 2014 - 09:56 AM

Thế thì gọi là dở chứ hay gì ^^


  • 0

#42 trandung8847

trandung8847

    Chưa sử dụng CAD

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

Đã gửi 17 July 2015 - 04:52 PM

Mình làm thiết kế. Trên bản vẽ có thể dùng đến 10 dim style có cách nào để gọi nhanh các dim style không? có cách nào để lấy nhanh các chữ số của lệnh đo đường thẳng rồi cho vào 1 bảng không?

thanks All


  • 0

#43 trandung8847

trandung8847

    Chưa sử dụng CAD

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

Đã gửi 26 December 2015 - 10:05 AM

CÓ AI GIẢI GIÚP MÌNH BÀI TOÀN NÀY VỚI

SAU KHI DIM KÍCH THƯỚC XONG MÌNH MUỐN LẤY SÔ KÍCH THƯỚC ĐÓ CHO VÀO 1 BANG TRONG CAD LUÔN. DIM KÍCH THƯỚC XONG MÌNH CỨ PHẢI COPY RỒI PASTE LÂU QUÁ. CÒN NHẬP BẰNG TAY ĐÔI KHI VẪN BỊ SAI. 


  • -1

#44 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

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

Đã gửi 27 December 2015 - 04:08 PM

CÓ AI GIẢI GIÚP MÌNH BÀI TOÀN NÀY VỚI

SAU KHI DIM KÍCH THƯỚC XONG MÌNH MUỐN LẤY SÔ KÍCH THƯỚC ĐÓ CHO VÀO 1 BANG TRONG CAD LUÔN. DIM KÍCH THƯỚC XONG MÌNH CỨ PHẢI COPY RỒI PASTE LÂU QUÁ. CÒN NHẬP BẰNG TAY ĐÔI KHI VẪN BỊ SAI. 

Hề hề hề,

Chưa hiểu cái bảng của bạn ra sao cả....

Bạn có thể tham khảo lisp dưới đây và chế biến cho hợp ý bạn nhé.

http://www.cadviet.c...194_dimline.lsp

 

(defun c:DL ( / ans e dt pt )
(setq ans (getstring "\n Chon dimlinear <Y or N> : "))
(if (= (strcase ans) "Y") 
(command "_dimlinear" (getpoint "\n Nhap diem dau cua kich thuoc can do")
                                          (getpoint "\n Nhap diem cuoi cua kich thuoc can do") 
                                          (getpoint "\n Nhap diem dat cua kich thuoc can do"))
(command "_dimaligned" (getpoint "\n Nhap diem dau cua kich thuoc can do")
                                          (getpoint "\n Nhap diem cuoi cua kich thuoc can do") 
                                          (getpoint "\n Nhap diem dat cua kich thuoc can do"))
)
(setq e (entlast)
         es (entget e)
         dt (rtos (cdr (assoc 42 es)) 2 2)
         pt (getpoint "\n Nhap diem dat cua text kich thuoc")  )
(command "text" "J" "MC" "non" pt 2 0 dt)
(princ)
)

  • 0
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#45 manhcuong14xd

manhcuong14xd

    Chưa sử dụng CAD

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

Đã gửi 10 January 2016 - 11:09 AM

load lisp đổi chiều cao không đổi đối tượng chọn mà đổi toàn bộ dimstyle
  • 0

#46 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 10 January 2016 - 02:55 PM

Bạn có đọc topic k :) Lisp nào, lệnh nào bạn ??
  • 0

#47 superbubam

superbubam

    Chưa sử dụng CAD

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

Đã gửi 23 May 2016 - 09:52 AM

các bác có bị trường hợp load lisp rồi không undo được không ạ..e load xong không undo được ạ :(


  • 0

#48 langtuchangti

langtuchangti

    biết pan

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

Đã gửi 10 April 2017 - 11:37 PM

cụ thể là như thế này .... khi e vẽ bên model e dùng tỉ lệ là 1:1 . và chiều cao dimtext là tùy ý,ví dụ là 30. sau khi chuyển sang layout,e muốn in bản vẽ trên khổ giấy A1.tất nhiên e sẽ phải tạo 1 khung mv,sau đó là sử dụng scale fix bản vẽ,ví dụ e scale fix là 1:90 . vậy khi in ra thì height dimtext sẽ là 30/90 = 0,5.trong khi đó quy định của bản vẽ là height text = 3,0.vậy e sẽ phải edit lại hdimtext là 90*3 = 180 thì khi in ra giấy hdimtext mới = 3,0 được.mà edit từng cái như vậy thì rất lâu ( lưu ý là ko thay chiều cao của cả style text đc,vì như vậy sẽ ảnh hưởng đến nhưng khung mv khác.do muốn in nhiều tỷ lệ trên 1 bản vẽ và bên model chỉ dùng 1 style ).e thấy người ta dùng lệnh ckt gì đó...mà có thể thay đổi được hết hdimtext nhưng đỗi tường đã quét qua....mà e về làm thử ko đc...dù đã có lisp đó trong cad 2007.vấn đề của e là ở chỗ đó....mong bác giải đáp sớm giúp e với...e đang rất cần...cám ơn bác nhiều !

bạn có lisp này chưa có thể chia sẻ được không, mình thấy ý tưởng này rất hay nhưng không tìm được lisp tương tự 


  • 0