Đến nội dung


Hình ảnh
- - - - -

Tìm text trùng giá trị


  • Please log in to reply
6 replies to this topic

#1 mua_buon12

mua_buon12

    biết vẽ circle

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

Đã gửi 23 December 2009 - 11:04 AM

Các bác ơi cho em hỏi làm sao để tìm được các text trùng nhau trên bản vẽ. Em gửi ví dụ lên nhờ mọi người chỉ giúp. Cảm ơn các bác
http://www.cadviet.c...es/2/vidu_1.jpg
  • 0
Khi Lập Trình Kiến Thức Là Một Phần, Nghệ Thuật Mới Là Tất Cả.

#2 xuantran15

xuantran15

    biết lệnh ddedit

  • Members
  • PipPipPipPip
  • 295 Bài viết
Điểm đánh giá: 112 (tàm tạm)

Đã gửi 23 December 2009 - 11:33 AM

Dùng lệnh find để tìm kiếm các đối tượng text giống nhau.
  • 0
Hình đã gửi
Thu đi cho lá vàng bay
Lá rơi cho đám cưới về......

#3 svba1608

svba1608

    Tưởng Thị Tú Khuyên

  • Moderator
  • PipPipPipPipPipPipPip
  • 601 Bài viết
Điểm đánh giá: 620 (tốt)

Đã gửi 23 December 2009 - 11:36 AM

Các bác ơi cho em hỏi làm sao để tìm được các text trùng nhau trên bản vẽ. Em gửi ví dụ lên nhờ mọi người chỉ giúp. Cảm ơn các bác
http://www.cadviet.c...es/2/vidu_1.jpg

Trong trường hợp này mình nghĩ là cần dùng lệnh fi (filter). Nếu bạn gửi file bản vẽ lên thì chắc dễ chỉ ra hơn. Hình dưới đây mình thử với các text, cả Dtext và Mtext, không cùng layer và không có điểm gì chung ngoài giá trị.
Để lọc các text có giá trị 3.5 bạn cần làm như sau:
+ Gõ fi.
Hiện ra một bảng bạn pick vào "Add select object" sau đó chọn text bất kỳ có giá trị 3.5. Bây giờ trên bảng có rất nhiều thông số:

Hình đã gửi

Bạn pick vào và xóa hết đi (bằng phím delete), chỉ cần giữ lại 2 thông số là: Object = text và Text value = 3.5.

Hình đã gửi

Sau đó bạn nhấn vào nút Apply và quét toàn bộ bản vẽ, sau khi Enter, bạn đã chọn được toàn bộ text có giá trị là 3.5 để ... thích làm gì thì làm. :(
  • 2
http://khuyen.space

#4 huong259

huong259

    biết lệnh refedit

  • Members
  • PipPipPipPipPipPipPip
  • 596 Bài viết
Điểm đánh giá: 350 (khá)

Đã gửi 23 December 2009 - 12:25 PM

Bài tham khảo:
http://www.cadviet.c...showtopic=12723
  • 0

#5 mua_buon12

mua_buon12

    biết vẽ circle

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

Đã gửi 23 December 2009 - 12:47 PM

Bài tham khảo:
http://www.cadviet.c...showtopic=12723


Cảm ơn các bác rất nhiều. Nhưng Tôi muốn các bác hướng dẫn viết 1 chương trình VBA tìm được tất cả các text trùng giá trị trên bản vẽ cơ. Thanks
  • 0
Khi Lập Trình Kiến Thức Là Một Phần, Nghệ Thuật Mới Là Tất Cả.

#6 anhcos

anhcos

    biết lệnh hatchedit

  • Advance Member
  • PipPipPipPip
  • 260 Bài viết
Điểm đánh giá: 170 (tàm tạm)

Đã gửi 23 December 2009 - 02:52 PM

Giả sử selset là tập chọn đối tượng text:

 Dim i, j as integer

Sử dụng thuật toán sau:

'mảng này dùng kiểm tra trong trường hợp số text được chọn quá nhiều
dim xemcotrunghaykhong(selset.Count-1) as boolean
for i=0 to selset.Count-1
xemcotrunghaykhong(i) = false'giả sử nó không trùng
next i

for i=0 to selset.Count-1
if xemcotrunghaykhong(i)=false then
for j=i+1 to selset.Count-1
if trim(selset.Item(i).TextString) = trim(selset.Item(j).TextString) then
xemcotrungkhong(j) = true'ngăn không xử lý nó trong tương lai

'làm cái gì đó ở đây

end if
next j
end if
next i

Cái trên chỉ xài cho text có chứa số thôi.

Nếu so sánh text thì khác, nhất là so sánh tiếng Việt khác mã lại mệt hơn.

Lệnh find không thể tìm thấy chữ "Việt" mã unicode và "Việt" mã VNI trong cùng một lần tìm được.
  • 1
Clear sky!

MF Rock collection.

#7 toantv821026

toantv821026

    Chưa sử dụng CAD

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

Đã gửi 19 January 2011 - 05:25 PM

CẢM ƠN BẠN NHIỀU NHÉ!
  • 0