Rated 5/5 based on 240179 internet user reviews

Đến nội dung


Hình ảnh

Tạo Khung tên


  • Please log in to reply
23 replies to this topic

#1 mauhv

mauhv

    biết zoom

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

Đã gửi 17 January 2008 - 12:40 AM

Làm sao có thể tạo 1 khung tên bản vẽ để có thể sửa 1 lần là các bản vẽ khác sửa theo
Tôi tình cờ xem 1 bản vẽ có khung tên rất hay. Hình như là tạo từ (attribute block) gì đấy. Nhưng tôi thử mãi mà không được
Bác nào biết chỉ giúp với.
Thank all.
  • 0

#2 KE AN MAY DI VANG

KE AN MAY DI VANG

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 822 Bài viết
Điểm đánh giá: 569 (tốt)

Đã gửi 17 January 2008 - 02:29 AM

Làm sao có thể tạo 1 khung tên bản vẽ để có thể sửa 1 lần là các bản vẽ khác sửa theo
Tôi tình cờ xem 1 bản vẽ có khung tên rất hay. Hình như là tạo từ (attribute block) gì đấy. Nhưng tôi thử mãi mà không được
Bác nào biết chỉ giúp với.
Thank all.

Nếu tất cả các khung tên cùng đặt một block có tên là KT chẳng hạn thì bạn có thể sửa được, bằng cách phá vỡ block của một khung tên rồi sửa. sau đó bạn tạo lại block đó nhưng nhớ là vẫn lấy tên bock cũ là KT. Như vậy bạn chỉ cần sửa một khung là tất cả các khung khác được sửa theo.Trường hợp này tôi chưa gặp trong thực tế, chẳng lẽ nhiều bản vẽ lại có khung tên giống nhau về khung hình và chữ viết sao, nó phải khác nhau về tên chi tiết chứ ?
Trong công việc hàng ngày tôi thường chỉnh sửa khung tên bằng lệnh FIND. Giả sử trong tất cả các bản vẽ có ghi ngày 2/12/07, nếu muốn sửa lại thành ngày 2/1/08 thì sẽ rất mất thời gian...Bạn chỉ cần dùng lệnh FIND sửa một ...phát là tất cả các bản vẽ đều được chỉnh sừa. Cách làm như sau:
-Bạn dùng lệnh ED sau đó nháy chuột phải vào dòng chữ cần sửa rồi copiEsc để kết thúc lệnh ED
- Gõ lệnh FIND sẽ hiện ra bảng Find and Replac
- Paste dòng chữ vào vào ô Find text string
- Paste tiếp vào ô Replase with rồi chỉnh sửa ở dòng thứ 2 này.
  • 1
KẺ ĂN MÀY DĨ VÃNG

#3 MANHHUNGXDA

MANHHUNGXDA

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 926 Bài viết
Điểm đánh giá: 456 (tốt)

Đã gửi 17 January 2008 - 08:20 AM

Nếu tất cả các khung tên cùng đặt một block có tên là KT chẳng hạn thì bạn có thể sửa được, bằng cách phá vỡ block của một khung tên rồi sửa. sau đó bạn tạo lại block đó nhưng nhớ là vẫn lấy tên bock cũ là KT. Như vậy bạn chỉ cần sửa một khung là tất cả các khung khác được sửa theo.Trường hợp này tôi chưa gặp trong thực tế, chẳng lẽ nhiều bản vẽ lại có khung tên giống nhau về khung hình và chữ viết sao, nó phải khác nhau về tên chi tiết chứ ?
Trong công việc hàng ngày tôi thường chỉnh sửa khung tên bằng lệnh FIND. Giả sử trong tất cả các bản vẽ có ghi ngày 2/12/07, nếu muốn sửa lại thành ngày 2/1/08 thì sẽ rất mất thời gian...Bạn chỉ cần dùng lệnh FIND sửa một ...phát là tất cả các bản vẽ đều được chỉnh sừa. Cách làm như sau:
-Bạn dùng lệnh ED sau đó nháy chuột phải vào dòng chữ cần sửa rồi copiEsc để kết thúc lệnh ED
- Gõ lệnh FIND sẽ hiện ra bảng Find and Replac
- Paste dòng chữ vào vào ô Find text string
- Paste tiếp vào ô Replase with rồi chỉnh sửa ở dòng thứ 2 này.


đơn giản thôi mà, tôi vẫn sửa ngon lành
tôi tặng bạn 1 lisp tôi mới viết, có gì thì báo cho tôi 0977.69.1102
Cách sử dụng:
+copy cái file tvcn.dwg vào Support
+load lisp
+lệnh là bv
chú ý là số thứ tự bản vẽ nó nhẩy đấy
khi muốn sửa các cái khác thuộc khung tên, bạn dùng lệnh BE, chọn khung tên
http://www.cadviet.com/upfiles/mhpro.rar
VỚI CÁI LISP ĐƠN GIẢN NÀY, BẠN CÓ THỂ TẠO RA 1 CÁI # ĐỂ PHÙ HỢP VỚI KHUNG TÊN CỦA BẠN
+DÙNG LỆNH ATT CHO CÁC BIẾN TRONG KHUNG TÊN
+KHAI TRIÊN CÁI LISP CỦA MINH
chúc bạn thành công!!!
Phải nói thêm rằng, với cách của tôi, sau khi vẽ rất nhiều bản vẽ, bạn có thể làm 1 mục lục bản vẽ(số tthú tự và tên) chỉ trong 10'
hãy thử xem
  • 1
Hãy ước cho trọn 1 ước mơ!

#4 be_chanh

be_chanh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 1712 Bài viết
Điểm đánh giá: 886 (rất tốt)

Đã gửi 17 January 2008 - 10:01 AM

sao lại có gắng làm phức tạp hóa vấn đề nên thế hả bạn. đơn giản thôi. đầu tiên ta cần xác định những thành tố nào trong khung tên sẽ thay đổi theo từng khung tên và những thành tố nào không thay đổi trong tưng khung tên.

với những thánh tố sẽ thay đổi thwo từng khung tên ta dùng với att, còn lại dùng với text thường. vd những thành tố sẽ thay đổi như, KT, KC..., tên bản vẽ, ti lệ....đó xong rồi bạn block hết với nhau là được mà. quá dễ phải không.
  • 1

t: 097.323.1199 | m: cudstk@gmail.com | w: http://www.aicollect.com


#5 thoclep

thoclep

    biết lệnh offset

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

Đã gửi 17 January 2008 - 10:05 AM

Làm sao có thể tạo 1 khung tên bản vẽ để có thể sửa 1 lần là các bản vẽ khác sửa theo
Tôi tình cờ xem 1 bản vẽ có khung tên rất hay. Hình như là tạo từ (attribute block) gì đấy. Nhưng tôi thử mãi mà không được
Bác nào biết chỉ giúp với.
Thank all.

Bạn vào đây để tham khảo:
http://www.cadviet.c...o...ic=2085&hl=
  • 0

#6 ro88

ro88

    biết vẽ arc

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

Đã gửi 29 September 2012 - 04:42 PM

Mình có cái khung tên này do ở công ty mình làm từ lâu giờ. toàn bộ làm thủ công hết.nhưng đối với bản vẽ nhỏ thì còn đỡ chứ mấy bản vẽ lớn thì làm mất phải vài ngày.Nhờ các bạn dựa trên khung tên có sẵn trên bản vẽ có thể viết cho mình cái lisp để làm cho nhanh hơn được ko. Cảm ơn rất nhiều.
đây là bản mẫu:


http://www.cadviet.c..._khung_to_1.dwg

Mong được các bạn quan tâm
  • 0

#7 VoHoan

VoHoan

    biết lệnh copy

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

Đã gửi 29 September 2012 - 05:16 PM

Làm sao có thể tạo 1 khung tên bản vẽ để có thể sửa 1 lần là các bản vẽ khác sửa theo

Nếu theo ý này của bạn thì nên dùng khung tên dạng Referencer thì hay nhất, cách dùng nó ntn thì bạn tìm trên diễn đàn nhé.
  • 0

#8 ro88

ro88

    biết vẽ arc

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

Đã gửi 29 September 2012 - 06:05 PM

VoHoan ơi có thể giúp mình ko vậy?Tại vì đang làm gấp quá nên có gì anh em thông cảm mình nha.
  • 0

#9 ro88

ro88

    biết vẽ arc

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

Đã gửi 29 September 2012 - 07:19 PM

Các bạn có thể bớt chút thời gian giúp mình với.Đang tạo khung tờ cho 59 tờ bản đồ mà ngồi sửa tùng tờ 1 lâu quá.nhìn loạn hết cả mắt.
Làm ơn giúp với.Cảm ơn các bạn nhiều lắm.CÓ bạn nào ở Nha Trang mình mời uống cafe.
  • 0

#10 VoHoan

VoHoan

    biết lệnh copy

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

Đã gửi 29 September 2012 - 09:20 PM

Tạo khung tên là block hay Xref thì sau này chỉnh sửa khung tên thuận lợi hơn thôi. Còn bây giờ bạn vào khung tên hay sửa khung bản vẽ của người khác thì vẫn phải làm thủ công từng bản vẽ chứ.
  • 0

#11 ro88

ro88

    biết vẽ arc

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

Đã gửi 29 September 2012 - 09:43 PM

VoHoan đã xem file bản vẽ của mình rồi ha?
Nguyên cái khung đấy là mình làm thủ công từng cái một cho nên rất mất thời gian
ở trong Topo co cái tạo khung bản đồ kiểu pick điểm dưới cùng bên trái rồi pick điểm trên cùng góc bên phải là nó chạy ra khung luôn cho mình có cả mắt lưới luôn
Nhưng nó lại không giống với cái khung mà ở cty mình đã làm,mình có up trên bản vẽ đấy.
Mình muốn nhờ bạn có thể xem bản vẽ rồi từ đó tạo lisp tạo khung tờ giúp minh được ko?
Hay là có cách nào khác bạn chỉ giúp nhé.
Cảm ơn rất nhiều.
Mình up lại bản vẽ nhé

http://www.cadviet.c..._khung_to_2.dwg


Rất mong được các bạn giúp đỡ.
  • 0

#12 VoHoan

VoHoan

    biết lệnh copy

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

Đã gửi 29 September 2012 - 09:55 PM

Cho mình hỏi là các text số mép ngoài bản vẽ có phải thay đổi không. Nếu chỉ có các dòng bạn chỉ dẫn phải thay đổi thì dùng khung tên block thuộc tính là làm được?
  • 0

#13 ro88

ro88

    biết vẽ arc

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

Đã gửi 30 September 2012 - 12:51 AM

Các text số mép ngoài cũng thay đổi dựa theo mắt lưới.để mình ví dụ thế này nhé:
Bạn có thể tạo lips thế này:
Tên lệnh :KBD
pick chọn điểm góc dưới bên trái (điểm này là mắt lưới mình tạo ra co tọa độ chẵn VD: X=1349000 Y=602000)
pick chọn điểm trên cùng bên phải
VD:Tỉ lệ bản vẽ là 1/500 thì khoảng cách mỗi mắt lưới là 50 thi tọa độ sẽ tăng dần lên X=1349050 Y=602050
Text Tọa độ X và Y bạn để giống như bản vẽ của mình nhé 1349 là (0.85) 050là 1.25 và tọa độ Y cũng vậy
Quan trọng là tọa độ này thôi,tại vì khi mình có một bản vẽ lớn mình muốn tạo tờ bản đồ để in phải chia ra từng tờ mà mỗi tờ thì phải sủa lại các text tọa độ nên rất lâu, còn phần Khung tên , tỉ lệ xích, tên bản vẽ ,địa chỉ bạn tạo thế nào cũng được nhưng có thể chỉnh sủa là được rồi.
Nếu ko thấy phiền bạn có thể cho mình xin số điện thoại mình có thể trình bày rõ ràng hơn.
Thanks bạn nhiều nhé.
Bây giờ mình phải ngồi sửa từng cái lâu quá.
Để mình up bản vẽ này lên chắc bạn sẽ hình dung được,


http://www.cadviet.c...1_ban_mau_2.dwg


Sđt mình là 01662203938 có gì bạn nhá máy mình gọi lại nhé,mình tên vũ.
  • 0

#14 VoHoan

VoHoan

    biết lệnh copy

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

Đã gửi 30 September 2012 - 11:33 AM

Mình làm cái lisp này bạn xem phải sửa những gì nữa nhé. Đế lisp chạy được bạn copy 3 block "Nut goc", "Nut canh" và "Nut canh dung" trong file mình gửi kèm đây vào các bản vẽ mới nhé. http://www.mediafire...aziat8pathma09x (sao không dùng được up file cua CV nhi).
Riêng khung bản vẽ bạn nên tập làm theo block thuộc tính xem ntn.
(defun c:KDB ( / TLe P1 P2 P3 P4 X1 Y1 X2 Y2 Q1 Q2 Q3 Q4 Lx Ly mQ14 mQ23 mQ24 mQ13 Nx Ny
  i Qi Xi Yi)
(batdau)
(setq TLe (/ (getint "\nNhap ty le ban do <500>: ") 10)
P1 (getpoint "\nPick diem dau: ")
P2 (getpoint "\nPick diem cuoi: ")
X1 (getreal "\nNhap toa do X diem dau: ")
Y1 (getreal "\nNhap toa do Y diem dau: ")
Q1 (polar P1 (/ pi 4) (sqrt 72))
Q2 (polar P2 (* 5 (/ pi 4)) (sqrt 72))
Q3 (polar Q1 0 (- (car Q2) (car Q1)) )
Q4 (polar Q2 0 (- (car Q1) (car Q2)) )
Lx (abs (- (car Q1) (car Q2)) )
Ly (abs (- (cadr Q1) (cadr Q2)) )
mQ14 (polar Q1 (/ pi 2) (/ Ly 2))
mQ23 (polar Q3 (/ pi 2) (/ Ly 2))
mQ24 (polar Q4 0 (/ Lx 2))
mQ13 (polar Q1 0 (/ Lx 2))
X2 (+ Lx X1)
Y2 (+ Ly Y1)
Nx (fix (/ Lx TLe))
Ny (fix (/ Ly TLe))
)
(setvar "osmode" 0)
(command "RECTANG" P1 P2)
(command "PEDIT" "L" "W" 0.5 "")
(command "RECTANG" Q1 Q2)
(command "-INSERT" "Nut goc" Q1 1 1 0 "1349" (rtos Y1 2 2) (rtos X1 2 2) "589")
(command "-INSERT" "Nut goc" Q3 1 1 0 "1349" (rtos Y1 2 2) (rtos X2 2 2) "589")
(command "MIRROR" "L" "" Q3 Q2 "Y")
(command "-INSERT" "Nut goc" Q4 1 1 0 "1349" (rtos Y2 2 2) (rtos X1 2 2) "589")
(command "MIRROR" "L" "" Q4 Q2 "Y")
(command "-INSERT" "Nut goc" Q2 1 1 0 "1349" (rtos Y2 2 2) (rtos X2 2 2) "589")
(command "MIRROR" "L" "" Q3 Q2 "Y")
(command "MIRROR" "L" "" Q4 Q2 "Y")
(setq i 1)
(repeat Nx
(setq Qi (polar Q1 0 (* i TLe))
  Xi (+ X1 (* i TLe))
  i (1+ i)
)
(command "-INSERT" "Nut canh" Qi 1 1 0 "589" (rtos Xi 2 2))
(command "MIRROR" "L" "" mQ14 mQ23 "N")
)
(setq i 1)
(repeat Ny
(setq Qi (polar Q1 (/ pi 2) (* i TLe))
  Yi (+ Y1 (* i TLe))
  i (1+ i)
)
(command "-INSERT" "Nut canh dung" Qi 1 1 0 (rtos Yi 2 2) "1389")
(command "MIRROR" "L" "" mQ24 mQ13 "N")
)
(ketthuc)
)
;*******************
(defun batdau ( )
(setvar "MODEMACRO" "VoHoan")
(setvar "CMDECHO" 0)
(command "undo" "be")
(setq osl (getvar "osmode"))
(setvar "osmode" 5031)
)
;********************
(defun ketthuc ( )
(setvar "osmode" osl)
(command "undo" "end")
(princ loichao)
(princ)
)

  • 1

#15 tranhuuanh_kt89

tranhuuanh_kt89

    biết zoom

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

Đã gửi 30 September 2012 - 12:12 PM

đơn giản thôi mà, tôi vẫn sửa ngon lành tôi tặng bạn 1 lisp tôi mới viết, có gì thì báo cho tôi 0977.69.1102 Cách sử dụng: +copy cái file tvcn.dwg vào Support +load lisp +lệnh là bv chú ý là số thứ tự bản vẽ nó nhẩy đấy khi muốn sửa các cái khác thuộc khung tên, bạn dùng lệnh BE, chọn khung tên http://www.cadviet.c...files/mhpro.rar VỚI CÁI LISP ĐƠN GIẢN NÀY, BẠN CÓ THỂ TẠO RA 1 CÁI # ĐỂ PHÙ HỢP VỚI KHUNG TÊN CỦA BẠN +DÙNG LỆNH ATT CHO CÁC BIẾN TRONG KHUNG TÊN +KHAI TRIÊN CÁI LISP CỦA MINH chúc bạn thành công!!! Phải nói thêm rằng, với cách của tôi, sau khi vẽ rất nhiều bản vẽ, bạn có thể làm 1 mục lục bản vẽ(số tthú tự và tên) chỉ trong 10' hãy thử xem

anh có thể chỉ rõ hơn k anh? em chưa hiểu mấy thông số trong đó có ý nghĩa gì?
  • 0
Sống trong đời sống, cần có một tấm lòng...

#16 tranhuuanh_kt89

tranhuuanh_kt89

    biết zoom

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

Đã gửi 30 September 2012 - 12:32 PM

Nếu tất cả các khung tên cùng đặt một block có tên là KT chẳng hạn thì bạn có thể sửa được, bằng cách phá vỡ block của một khung tên rồi sửa. sau đó bạn tạo lại block đó nhưng nhớ là vẫn lấy tên bock cũ là KT. Như vậy bạn chỉ cần sửa một khung là tất cả các khung khác được sửa theo.Trường hợp này tôi chưa gặp trong thực tế, chẳng lẽ nhiều bản vẽ lại có khung tên giống nhau về khung hình và chữ viết sao, nó phải khác nhau về tên chi tiết chứ ? Trong công việc hàng ngày tôi thường chỉnh sửa khung tên bằng lệnh FIND. Giả sử trong tất cả các bản vẽ có ghi ngày 2/12/07, nếu muốn sửa lại thành ngày 2/1/08 thì sẽ rất mất thời gian...Bạn chỉ cần dùng lệnh FIND sửa một ...phát là tất cả các bản vẽ đều được chỉnh sừa. Cách làm như sau: -Bạn dùng lệnh ED sau đó nháy chuột phải vào dòng chữ cần sửa rồi copiEsc để kết thúc lệnh ED - Gõ lệnh FIND sẽ hiện ra bảng Find and Replac - Paste dòng chữ vào vào ô Find text string - Paste tiếp vào ô Replase with rồi chỉnh sửa ở dòng thứ 2 này.

cách này cũng được, nhưng thủ công quá..
  • 0
Sống trong đời sống, cần có một tấm lòng...

#17 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 30 September 2012 - 12:37 PM

Xem bản vẽ của ro88 lại nhớ đến cái lisp in bản đồ dài chỉ dùng 1 khung tên bên Layout làm lâu lâu rồi, xét cho cùng cũng có thể update cho cái này để chỉ pick 1 phát là trình bày xong cả đống hình trích xuất kia :)
Mình cũng k hiểu sao với các text ro k dùng lisp cộng text, ngồi sửa mần chi :| Mỗi khung mất mấy phút sao hết vài ngày được :o
  • 0

Thành viên nhóm CadMagic.

Mời bạn ghé thăm facebook nhóm  :

CAD MAGIC


#18 ro88

ro88

    biết vẽ arc

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

Đã gửi 30 September 2012 - 09:39 PM

Ngày hôm nay mới đi làm về ko trả lời được.
Cảm ơn VoHoan và ketxu nhiều nhé.
ý của mình cũng giống như ketxu nói đấy
tạo lisp sao cho pick 2 điểm ở 2 góc khung bản đồ với nhập tỉ lệ vào là là chạy một phát ra hết cái đống lằn nhằn kia là được
ko biết là có khả thi ko nữa
  • 0

#19 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 30 September 2012 - 10:17 PM

Không. Ý của mình là quét chọn tất cả các khung HCN, đánh dấu gốc tọa độ -> Xong cơ ^^
  • 0

Thành viên nhóm CadMagic.

Mời bạn ghé thăm facebook nhóm  :

CAD MAGIC


#20 ro88

ro88

    biết vẽ arc

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

Đã gửi 30 September 2012 - 10:46 PM

Để nhờ bạn master_worse sửa lại lisp (+c) cho nó xuất kết quả đè lên text cũ là ok rồi. còn mấy cái kia để sửa 1 cái rồi copy qua cho mấy bản khác.ketxu xem có thể giúp mình sửa lisp đó được ko vậy.
À cho minh hỏi cái này nhé
VD mình có text A=5000 (hay một số bất kỳ) B=6000 (hay một số bất kỳ) C= 7000 (hay một số bất kỳ),v.v.......
mình copy text A =5000 (hay một số bất kỳ) past đè vào text B,C,v.v.....đó.nó sẽ thay đổi text của B,C,v.v.. đấy thành text của A
có lisp nào như vậy ko,và nếu có thì bạn có thể cho mình cái tên để minh seach trên diễn đàn nhé.
Thanks rất nhiều.
  • 0