Chuyển đến nội dung
Diễn đàn CADViet

viendinhngoc

Thành viên
 Xem Hồ Sơ  Xem hoạt động của họ

  • Số lượng nội dung

    55

  • Đã tham gia

  • Lần ghé thăm cuối

Bài đăng được đăng bởi viendinhngoc

  4. Đã đăng · Trả lời báo cáo

    m làm vẫn không được

    làm trong bản vẽ mới thì được

    https://www.dropbox.com/s/s64obhgys7irnzk/Ban%20in%20-%20Sua%20mat%20duong%20%285-4-14%29%20final%20Lam%20PL.dwg

    chỗ mình cần cắt

    khi chọn đối tượng

    lần 1 thì nó không chọn được

    phải tích lần 2 mới chọn đường cần cắt được

    mà 2D polyline vơi polyline có khác gì nhau không

    vì minh muốn lấy tọa độ polyline

  7. Đã đăng · Trả lời báo cáo

     

    Bạn thử cái này xem. 

     

    (defun c:brk(/ ent os)
  (vl-load-com)
  (defun ints (o1 o2 / l0 l)
    (setq l (vlax-Invoke (vlax-EName->vla-Object o1) "IntersectWith" (vlax-EName->vla-Object o2) acExtendBoth)
 l0 nil)
    (while l
      (setq l0 (append l0 (list (list (car l) (cadr l) (caddr l))))
   l (cdddr l)))
    l0
  )
  (command "undo" "be") 
  (setq ent (car (entsel "\nChon Line/Polyline bi cat:"))
os (getvar 'osmode))
  (setvar 'osmode 0)
  (prompt "\nChon cac Line/Polyline de cat:")
  (mapcar '(lambda(x) (mapcar '(lambda(y) (command "break" ent y y)) (ints ent x)))
    (vl-remove-if 'listp (mapcar 'cadr (ssnamex (ssget '((0 . "LINE,*POLYLINE")))))))
  (command "undo" "e") (setvar 'osmode os)
)

     

     

    Cảm ơn lisp của bạn nhưng mình muốn là sau khi cắt nó là 1 polyline gồm nhiều polyline con ( giống kích chọn 1 poly thì chọn luôn tất cả poly ấy)

  8. Đã đăng · Trả lời báo cáo

    mình muốn có lisp chia cho nhanh như trong hình có nhiều đường thẳng giao với nó

    mình muốn tại tất cả đường giao đều chia thanh pline

     

    1. Ý bạn là muốn cắt pline thành nhiều đoạn tại giao điểm hay là vẫn chỉ là 1 pline nhưng có thêm đỉnh tại giao điểm?

    2. Bạn dùng lệnh break để cắt 1 pline thành 2, không cần dùng lisp.

    mình không dugnf break muốn cát thành 1pline nhiều đoạn nên break không được

  14. Đã đăng · Trả lời báo cáo

    mình có yêu cầu thế này nhớ bác nào biết viết giùm mình với

    1. m có 1 đường line hoặc poly

    giao với nhiều đường line hoặc polyline giờ mình muốn tại chỗ giao nhau nó sẽ chia thành nhiều 1 đường polyline có nhiều đoạn

    2. tiếp là 1 lisp chía 1 poLYLINE THÀNH 2 polyline riêng biệt

    mình cảm ơn nhé

    https://www.dropbox.com/s/9towy53mdr3mlzu/RQ.PNG

  16. Đã đăng · Trả lời báo cáo

    cad của mình không hiẻu soa bị lõi gì mà giờ in rất chậm trước chỉ khoảng 2 3 s là in giờ phải cứ từ 1p trở lên bản vẽ nào cũng thế 

    mà chả hiểu tại sao

    bạn nào biết chỉ giúp mình với

     

    https://www.facebook.com/photo.php?fbid=577604782354506&set=a.215005478614440.47396.100003149696156&type=1

    bạn nòa giúp mình với

    giờ in cad bực mình quá

×