Đến nội dung


Hình ảnh
- - - - -

Nhờ viết lisp gộp Dimension và Text style


  • Please log in to reply
6 replies to this topic

#1 pawuta

pawuta

    biết lệnh move

  • Members
  • PipPipPip
  • 126 Bài viết
Điểm đánh giá: -12 (hơi kém)

Đã gửi 14 May 2015 - 10:36 PM

Nhờ mọi người viết giúp lisp dùng để gộp Dimension và Text Style trong bản vẽ về Dimension và Text Style chuẩn cụ thể như sau:

- Đánh lệnh GD (gộp dimension) -> select chọn 1 Dim thuộc Dimension chuẩn (ví dụ: DIM1-100 có trên bản vẽ) -> select chọn các Dim thuộc Dimension khác (ví dụ: DIM1-10, DIM1-200....D1-20.v.v...) muốn chuyển về Dimension chuẩn. Thì tất cả các Dim thuộc các Dimension được chọn đó sẽ chuyển về Dimension: DIM1-100.

- Đánh lệnh GT (gộp text style) -> select chọn 1 text thuộc Text Style chuẩn (ví dụ: TEXT GHI CHU có trên bản vẽ) -> select chọn các text thuộc các Text Style khác (ví dụ: TEXT TIEU DE; T THEP.....) muốn chuyển về Text Style chuẩn. Thì tất cả các Text (Dtext hoặc Mtext) thuộc các Text Style được chọn sẽ chuyển về Text Style: TEXT GHI CHU.

Đây là bản vẽ mình lấy làm ví dụ: http://www.cadviet.c...0_ban_ve_vd.dwg

Mong mọi người giúp đỡ, cảm ơn!


  • 0

#2 Tue_NV

Tue_NV

    KS Võ Quang Tuệ

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

Đã gửi 15 May 2015 - 06:59 AM

Nhờ mọi người viết giúp lisp dùng để gộp Dimension và Text Style trong bản vẽ về Dimension và Text Style chuẩn cụ thể như sau:

- Đánh lệnh GD (gộp dimension) -> select chọn 1 Dim thuộc Dimension chuẩn (ví dụ: DIM1-100 có trên bản vẽ) -> select chọn các Dim thuộc Dimension khác (ví dụ: DIM1-10, DIM1-200....D1-20.v.v...) muốn chuyển về Dimension chuẩn. Thì tất cả các Dim thuộc các Dimension được chọn đó sẽ chuyển về Dimension: DIM1-100.

- Đánh lệnh GT (gộp text style) -> select chọn 1 text thuộc Text Style chuẩn (ví dụ: TEXT GHI CHU có trên bản vẽ) -> select chọn các text thuộc các Text Style khác (ví dụ: TEXT TIEU DE; T THEP.....) muốn chuyển về Text Style chuẩn. Thì tất cả các Text (Dtext hoặc Mtext) thuộc các Text Style được chọn sẽ chuyển về Text Style: TEXT GHI CHU.

Đây là bản vẽ mình lấy làm ví dụ: http://www.cadviet.c...0_ban_ve_vd.dwg

Mong mọi người giúp đỡ, cảm ơn!

 

Bạn có thể dùng lệnh MA kết hợp 'FI


  • 0

#3 pawuta

pawuta

    biết lệnh move

  • Members
  • PipPipPip
  • 126 Bài viết
Điểm đánh giá: -12 (hơi kém)

Đã gửi 15 May 2015 - 07:58 AM

Bạn có thể dùng lệnh MA kết hợp 'FI

Cảm ơn bạn đã quan tâm, mình muốn gộp giống như lệnh Laytrans để gộp layer dễ quản lý và gọn. Nếu dùng MA + 'Fi thì sẽ không chọn triệt để và không xóa được các Dimension và Text Style thừa (không cần đến)


  • 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 15 May 2015 - 08:32 AM

 

Câu hỏi mở đầu topic đâu có nói đến chuyện phải xóa Dimension Style và Text Style đâu nhỉ?


  • 0

#5 pawuta

pawuta

    biết lệnh move

  • Members
  • PipPipPip
  • 126 Bài viết
Điểm đánh giá: -12 (hơi kém)

Đã gửi 15 May 2015 - 08:48 AM

 

 

Câu hỏi mở đầu topic đâu có nói đến chuyện phải xóa Dimension Style và Text Style đâu nhỉ?

 

Hehe, ý mình là gộp các Dimension Style, Text Style lại cho gọn và đồng thời có thể xóa các DStyle, TStyle đễ dễ quản lý và đỡ rối mắt


  • 0

#6 Tr.CongSon

Tr.CongSon

    biết lệnh array

  • Members
  • PipPipPip
  • 183 Bài viết
Điểm đánh giá: 40 (tàm tạm)

Đã gửi 19 May 2015 - 04:41 PM

Mình nghĩ cái này đâu cần phải dùng Lisp đâu bạn

  • Đầu tiên bạn chon tất cả Dim or Text --> Bằng lệnh selectsimilar or Fi
  • Rồi Chọn Dimstyle or Textstyle (trên thanh Taskbar cần chuyển đến  là xong mà
  • Muốn xóa thì Pu--> All là xóa tất cả cái không dùng trên bản vẽ

Hi vọng giúp được bạn!


  • 0

#7 pawuta

pawuta

    biết lệnh move

  • Members
  • PipPipPip
  • 126 Bài viết
Điểm đánh giá: -12 (hơi kém)

Đã gửi 20 May 2015 - 12:40 PM

Mình nghĩ cái này đâu cần phải dùng Lisp đâu bạn

  • Đầu tiên bạn chon tất cả Dim or Text --> Bằng lệnh selectsimilar or Fi
  • Rồi Chọn Dimstyle or Textstyle (trên thanh Taskbar cần chuyển đến  là xong mà
  • Muốn xóa thì Pu--> All là xóa tất cả cái không dùng trên bản vẽ

Hi vọng giúp được bạn!

Cảm ơn bạn nhé! với cách này thì cũng có khi không xoá được. Nếu có lệnh nào đó thao tác cho Dimension và Textstyle như lệnh Laytrans gộp layer từ bản vẽ mẫu thì hay biết mấy


  • 0