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

phamthanhbinh

Vip
  • Số lượng nội dung

    5864
  • Đã tham gia

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

  • Ngày trúng

    184

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


  1. Công việc của mình hay vẽ lại các bản mã như thế này, tuy đơn giản nhưng lại mất thời gian. Mình muốn có một lisp chỉ cần nhập kích thước bản mã, khoảng cách lỗ theo 2 phương ( Lỗ chèn bằng block trong File đính kèm).

    Xin cảm ơn rất nhiều!

    http://www.cadviet.com/upfiles/5/115759_ban_ma.dwg

    Hề hề hề,

    Không rõ bạn có hiểu hết yêu cầu bạn cần hay không, nhưng với mô tả trên bản vẽ cũa bạn thì các bản mã bạn cần đều là hình chữ nhât và chỉ có 4 lỗ bu lông thôi hay sao??? Các lỗ bu lông này đều đối xưng qua đường tâm bản mã ư??? Các lỗ bu lông đều có chung đường kính ư???

    Nếu bạn còn cần tới các dạng bản mã khác thì hãy nói rõ để có thể làm lisp một lần, tránh phải làm đi làm lại nhiều lần bạn ạ.

    • Vote tăng 1

  2. 1/ Cảm ơn anh Hiệp, đã kể một câu chuyện tình ngang trái  lâm ly bi đát tan nát cõi lòng...

    2/ Hơi bị tiếc là anh đã lạc đề ngay từ bức tranh số 2.

    3/ Anh đã viết: " Anh Choai buồn bã, nuối tiếc dõi theo bước đi của chị Mái ..."  Song thực tế chị Gà đang cưỡi  trên lưng anh Vịt phi qua sông đến miền đất hứa, hoặc hoang đảo gì đó....

    39678_untitled_21.pngKết quả: anh Hiệp đã thi đã không thi đỗ vào lớp 1, anh chịu khó thi lại nhé :) :) :)

    4/ Anh đọc lại bài viết của chị Hà em sẽ thấy:

    - Lời chị Hà em viết : "Thấy phụ huynh học sinh cả nước hừng hựng khí thế và  nhiệt huyết sôi sùng sục về chuyện luyện thi vào lớp 1..em  rất hoang mang và  lo lắng !."

    -  Lời kể trong câu chuyện của em: "Chị gà thấy anh Vịt cùng đàn con lễ mễ tay xách lách mang bút, nghiên, giấy, mực cũng nổi hứng "hừng hựng khí thế và  nhiệt huyết sôi sùng sục..."

    Như vậy , rõ ràng em chỉ trọc tức chị Hà em chứ không dám ném đá như anh Hiệp!

     

    5/Ở bài  số #26, em đã viết: "Con người ta sinh ra là do số phận, mọi sóng gió và giông bão của đời cũng đều do do số phận", xuất phát từ nhận thức đó, em luôn  thương yêu, thông cảm và  tôn trọng  những người nông dân chân lấm tay bùn, vất vả một nắng hai sương.

    6/ Nếu anh Hiệp nghĩ em là người thành thị nên viết bài trêu chọc, chê bai anh Hai Lúa thì quả là oan cho em quá anh Hiệp ạ!

    Em rất quý anh Hai Lúa, em đoán mò anh Hai Lúa là đồng hương của Bác Ba Phi sinh ra ở miền Tây Nam Bộ lập nghiệp ở ven biển cực nam của nước ta, không biết có đúng không???

     

    7/ Có thể anh chưa đọc : Diễn đàn Cadviet - một năm gắn bó và chia sẻ!      vùng  miền núi, nằm giữa vùng Tây Bắc - Đông Bắc và Trung du Bắc bộ. Quê hương chị  Hà Anh ở  châu thổ Sông Hồng thuộc trung du và miền núi phía bắc.

    Em không thích sống ở chốn thành đô nhốn nháo xô bồ, "đầy xa hoa cám dỗ",

    Em yêu thích những làng quê thanh bình, êm ả lũy tre xanh, cây đa giếng nước sân đình.

    Em thương dòng sông bến nước, thương những "con đò cắm con sào đứng đợi"... và thương cả dòng thơ Bút Tre:

    Con đò dịch đít sang ngang

    Xa xa có một cái làng thò ra

    Hề hề hề,

    Chả hiểu sao mọi người lại cứ thích phải có anh có chị nhể. Nhất là lại kể cho các cháu lớp sắp một thì thiệt là ...... người nhớn tệ.

    Quan điểm của mình ở đây có nhẽ là cả cô gà và chị vịt cùng cong cơn dắt con đi ......... chợ tỉnh thì phải ?????

    • Vote tăng 2

  3.   Mọi nguòi giúp mình chọn mặt phân khuôn với, chả là thế này :), chi tiết của mình là búa con xe máy. mình chọn đúc áp lực không biết có hợp lí chưa nữa, mình mô hình hóa xong mà chưa biết chọn mặt phân khuôn thế nào cho hợp lý nữa :( 148395_capture.png

    Hề hề hề, 

    Chim tiết này không quá khó để chọn mặt phân khuôn đâu, Bạn có thể gửi file bản vẽ này lên không??? Nếu bạn sử dụng SW để dựng 3D thì trong SW có phần hướng dẫn bạn tạo khuôn ngon lành.

    • Vote tăng 1

  4. Hồi xưa em cũng từng đi buôn gà, nếu biết toan tính như anh Hai Lúa,  chắc giờ em đã là đại gia rồi! :) :) :)

     

     

    Cảm ơn bác Bình đã quan tâm đến bài viết của em!

    Cách đây khoảng 2 tháng em đến nhà chị họ em,  con gái chị họ em mới hơn 3 tuổi đã đon đả  chào em bằng tiếng  Anh, cháu còn hỏi em bằng tiếng Anh : nhà cô mua được mấy cái ô tô rồi??? Khiến em choáng, vãi hết cả linh hồn. Thì ra rằng thì mà là rằng chị họ em đã dạy tiếng Anh cho cháu từ hơn một năm nay. Còn môn toán thì cháu đã biết làm đến phép cộng trừ trong phạm vi 10.

    Tìm kiếm trên mạng em cũng thấy choáng:

    Hơn 6.000 học sinh thi tiếng Anh tăng cường lớp 1. Sáng qua, khoảng 6.340 em vừa học xong mẫu giáo của TP HCM đã tham dự kỳ thi này.

    3 tuổi rưỡi đã 'oằn lưng' luyện thi vào lớp một

    Phụ huynh đang bị cuốn vào cuộc “chạy đua” cho con học trước khi vào lớp 1

    Thi vào lớp 1 khó hơn thi cao học?

    Thử làm đề thi vào lớp 1 trường Đoàn Thị Điểm: Người lớn cũng "hãi"

    Bác Bình ạ, thằng cu nhà em được 5 tuổi rồi, sang năm  cháu vào lớp 1. Thấy phụ huynh học sinh cả nước hừng hựng khí thế và  nhiệt huyết sôi sùng sục về chuyện luyện thi vào lớp 1,  em  rất hoang mang và  lo lắng !

    Em đang tính chuyện luyện thi môn toán cho cháu, vì thế mà em đã viết bài trong thư giãn với nội dung hỏi nghiêm túc, hơi buồn là  cái Hoằn lại tưởng em đùa.

     

    Em muốn hỏi bác và tất cả các bác đã từng là cựu phụ huynh, tư vấn giúp em việc có nên dạy học tuổi  cho cháu không???

    Ps: Những dòng chữ gạch chân mầu là đường link  dẫn đến nội dung bài viết, bác nào quan tâm thì nhấp chuột vào đọc.

    Hề hề hề,

    Bác Haanh đã hỏi nghiêm túc thì mình cũng xin trả lời nghiêm túc như sau:

    1/- Với trẻ con nên hiểu rằng học là chơi mà chơi cũng là học. Do vậy nếu tạo được hứng thú cho con trẻ trong việc học thì trước hay sau tuổi đều là OK. Việc học của con trẻ không nên áp đặt tư duy người lớn cho chúng mà nên để chúng tự thấy khoái và học sẽ hiệu quả gấp nhiều lần so với học mà không khoái.

    2/- Việc tạo niềm vui cho trẻ khi học tập có rất nhiều cách khác nhau. Nhưng có một cách không bao giờ nên dùng là so sánh đứa này với đứa khác bởi điều đó sẽ tạo ra một sự ghen tỵ trong trẻ cho dù là rất nhỏ.

    3/- Chớ bao giờ bắt con trẻ đi học thêm để bằng hay hơn chúng bạn, mà hãy dạy con trẻ tự học theo cái khoái của mình hoặc thông qua cái khoái của mình.

    4/- Có nhiều kiểu khoái khác nhau nhưng chớ khuyến khích con trẻ cái khoái trở thành anh hùng cá nhân. Hãy hướng cho trẻ tới cái khoái làm việc củng dồng bọn , giúp đỡ đồng bọn và cái khoái khi thấy đồng bọn thành công

     

    Đó là những điều mà mình đã dùng để dạy mấy đứa con mình và tới nay chúng nó tuy chưa thành công nhưng vẫn tồn tại với cuộc đời. 12 năm học phổ thông của chúng mình không mất một xu để cho con đi học thêm, kể cả thời gian ôn thi vào đại học. Trong quá trình chúng học đại học thì có mất tí ti cho chúng học ngoại ngữ ngoài chương trình của nhà trường. Theo mình thế là quá đủ với chung rồi. Bên cạnh đó mình khuyến khích chúng tham gia các hoạt động xã hội phù hợp với chúng.

     

    Mong rằng bác Haanh sẽ có phương pháp dạy con tốt hơn mình.

    • Vote tăng 2

  5.  

    11837_d.png

     

    Em đã trả lời bác trong 23 ô trống, mỗi ô 1 ký tự, em tạm khóa laye và sẽ mở sau! :) :) :)

    Xin mời các bác tiếp tục thư giãn???

     

     

    Bác Phamthanhbinh ơi, đáp số thứ là 9, không biết có phải ý bác muốn nói là có một đống người cũng trả lời đáp số là 9 không???

     

    Hề hề hề,

    Một đống mà mình nói là một đống thắc mắc như các bài post sau bài post của mình bác Haanh ạ.

    • Vote tăng 1

  6. Không hiểu tại sao đăng lên nó lại bị mất một đoạn, trong khi vào sửa lại thì vẫn thấy nó ở đó, nên em đăng lại ở đây:

     

    Bài học lớn từ sự khác biệt về tư duy.

    Admin Cadviet nhờ thành viên dịch hướng dẫn sử dụng, 

    Thành viên A: OK, nói đi, mày cần dịch những gì? dịch tất cả hả. OK tao sẽ dịch ngay.

    Thành viên B: Gượm đã, để tao xem tại sao lại cần dịch, dịch với mục đích gì rồi tao sẽ dịch.

     

     

    Em đã là thành viên A, và bây giờ em muốn là thành viên B.

    Hề hề hề,

    Cám ơn SVBA1608 đã thẳng thắn trao đổi các suy nghĩ của mình. Là một thành viên của diễn đàn, mình xin có một vài ý kiến như sau:

    1/- Diễn đàn này là của tập thể các thành viên là những người làm kỹ thuật trong các lĩnh vực khác nhau và là của Việt nam. Do vậy việc có bản dịch hướng dẫn sử dụng diễn đàn bằng tiếng Việt là điều cần thiết và nên làm bởi các lý do sau:

    - Hầu hết các nhà kỹ thuật đều chỉ tập trung vào chuyên môn của mình và cố gắng tự học thêm các ngoại ngữ đủ để hiểu biết và sữ dụng trong phạm vi chuyên môn mà thôi. Ít người có thể học đầy đủ và hoàn chỉnh về một ngoại ngữ như những nhà ngôn ngũ chuyên nghiệp.

    - Mặt khác rất nhiều thành viên mới có khả năng ngoại ngữ nói chung và tiếng Anh nói riêng còn hạn chế nên việc hiểu đúng các quy định sử dụng diễn đàn bằng tiếng Anh cũng là một khó khăn đẫn tới có nhiều bài viết vi phạm quy định chung của diễn đàn.

    - Hạn chế bớt được các thành viên không có nhu cầu trao đổi và học hỏi tham gia vào diễn đàn để giảm thiểu công tác quản lý diễn đàn.

    2/- Vì là nội dung hướng dẫn sử dụng diễn đàn, từ giao diện tới các nút chức năng nên việc dịch đầy đủ và hoàn thiện như thành viên A trả lới là đúng. Tuy nhiên do năng lực của mỗi thành viên là khác nhau nên ai thấy có khả năng và tham gia dịch được phần nào sẽ tốt cho ban quản trị phần đó và ban quản trị sẽ có nhiệm vụ tập hợp lại và hiệu đính để có thể có một bản dịch hoàn hảo nhất có thể (Nhiều khả năng vẫn còn những chỗ chưa thật chỉn chu do người dịch không phải là nhà ngôn ngữ chuyên nghiệp)

    3/- Bản chất của việc tham gia diễn đàn này là tự nguyện, nên việc tham gia các công việc chung của diễn đàn cũng là tự nguyện. Cho nên những ai quan tâm tới vấn đề đặt ra và có khả năng tham gia tới đâu thì tham gia tới đó. Sự tham gia này có thể có kết quả tốt mà cũng đôi khi có những hiệu quả không thật như ý của người tham gia. Điều này cũng là chuyện bình thường ở diễn đàn. Không thể luôn trông chờ một kết quả tối ưu từ diễn đàn.

    4/- Đúng là làm bất cứ việc gì mà nếu không thấy thích (enjoy) thì cũng khó có kết quả tốt được. Do vậy diễn đàn luôn cần những người enjoy với công việc chung của diễn đàn và luôn khuyến khích như vậy. Việc dịch tài liệu hướng dẫn sử dụng diễn đàn này là một trong những công việc cần tới sự enjoy như vậy.


  7. Em xin hỏi nghiêm túc Hoằn và anh Hai Lúa và các bác trên diễn đàn:

     

    11837_ppp.png

     

    Đáp số là 1 hay 9 ???

    Hề hề hề,

    Xin trả lời nghiêm túc với bác Haanh rằng thì là:

    1/- Ngày nhỏ đi học thì kết quả 9 sẽ được điểm 10.

    2/- Ngày lớn đi cày thì kết quả  9 sẽ được 1.....0

    3/- Đến bây giờ thì  kết quả 9 sẽ được ........ một .....đống.

    • Vote tăng 1

  8. Chào các anh

    Em hiện nay đang bán phụ gia dầu thủy lực nên phải tìm hiểu về các chỉ tiêu trong cơ khí. 13.gif

     

    Các sản phẩm, vật liệu thường là đạt tiêu chuẩn ASTM D-892, ASTM D-665...; hay là Vicker thì em chỉ biết là đo độ cứng, nhưng Vickers I-286-S, Vickers M-2950-S là gì? 

    Em muốn biết thêm là tiêu chuẩn đó đo cái gì, và số liệu đạt được như thế nào... Em muốn đọc hiểu được các số liệu này. Nhưng khi lên astm.org thì chỉ được giới thiệu sơ bộ hoặc không có gì. Rất mong các anh có thể giới thiệu hoặc chỉ dẫn cho em để tìm hiểu sâu về các vấn đề này.

     

    Chân thành cảm ơn 77.gif

    Hề hề hề,

    Buôn bán (phải ) biết người biết ta

    Hễ mà chưa biết thì tra Gúc gồ......

    Gúc gồ cho biết phần thô,

    Nếu muốn biết nữa thì vô ......oai kỳ.


  9. ai giúp e với!

    e vào layout để in,bật viewports lên nhưng ko thấy gì bên trong,cứ đen xì xì ý@@!

    có ai onl giúp e với!http://www.cadviet.com/upfiles/5/146228_2211_lan_2.dwg

    Hề hề hề,

    1/- cái đen sì sì hay trắng phớ là do bạn đặt màu nền của Cad mà thôi.

    2/- Bạn page setup lại trang in với tỷ lệ phù hợp thì sẽ nhìn được cả bố lẫn con nhà nó.


  10. Cám ơn các bác quan tâm.

    File đính kèmhttp://www.cadviet.com/upfiles/5/48467_vi_tri.dwg

    Hề hề hề,

    Bạn thử lisp dưới đây và lưu ý rằng nó chỉ đúng khi các polyline kín phải nằm hoàn toàn trên hoặc hoàn toàn dưới polyline chuẩn và thỏa các điều kiện như mình đã nói ở bài trước.

    Nếu chưa đúng ý thì bạn có thể tự xem và sửa tiếp và bổ sung những điều bạn cần.

    http://www.cadviet.com/upfiles/5/5194_xacdinhtrenduoi.lsp

     

    Theo mình bạn nên thay (= a 0) bằng hàm (equal .....) sẽ tốt hơn bởi quá trình vẽ có thể có những sai số nhỏ mà mắt thường không nhận thấy được.

    (defun c:xdtd (/ plk plc pls a ln)
    (vl-load-com)
    (setq oldos (getvar "osmode"))
    (setvar "osmode" 0)
    (setq plk (car (entsel "\n Chon pline kin"))
              plc (car (entsel "\n Chon pline chuan"))
              pls (acet-geom-vertex-list plk) 
              a 0 )
    (while (and (= a 0) (setq p (car pls)))
        (command "xline" "v" p "")
        (setq ln (entlast)
                  p1 (car (acet-geom-intersectwith ln plc 0))
                 a (- (cadr p) (cadr p1))
                 pls (cdr pls)  )
       (command "erase" ln "")
    )
    (if (> a 0)
        (alert "\n Polyline kin nam tren polyline chuan")
        (alert "\n Polyline kin nam duoi polyline chuan")
    )
    (setvar "osmode" oldos)
    (princ)
    )
    
    • Vote tăng 1

  11. Xin chào các anh em cao thủ trên diễn đàn, mong các anh em giúp đỡ mình một cái lisp có thể xử lý được mấy vấn đề này:

    Gõ lệnh, rồi quét chọn nhiều đường line, chọn chiều cao text và khoảng offset với đường thẳng thì lisp sẽ tự động ghi độ dốc dạng thập phân lên theo chiều song song với đoạn line đó.

    Rất mong và cảm ơn các anh em quan tâm và giúp đỡ ạ :) :) :) :)

    Hề hề hề,

    1/- Có rất nhiều lisp ghi độ dốc ở trên diễn đàn. hãy chịu khó tìm kiếm xem có cái nào phù hợp với yêu cầu của bạn.

    2/- Bạn nêu yêu cầu nhưng không có bản vẽ minh họa thì không thể hiểu cái bạn cần để giúp.

    3/- Có rất nhiều cách ghi độ dốc: theo %, theo góc độ .... Bạn muốn cái chi???

    4/- Bạn nên tìm hiểu kỹ quy định của diễn đàn trước và trong quá trình tham gia diễn đàn.

    • Vote tăng 1

  12. Nhờ các anh chị trong diễn đàn viết hộ em lisp hoặc có lệnh nào trong cad thì chỉ hộ em như sau:

    Thao tác giống lệnh copy nhưng khi nhập khoảng cách lần sau (lần 2,3,4....) nó sẽ cộng thêm các khoảng cách lần trước.

    Ví dụ cụ thể như sau: Đánh lệnh CCO -> chọn đối tượng cần copy và chọn hướng muốn copy -> nhập khoảng cách: 1254 (lần 1)->enter -> nhập khoảng cách ->6546 (lần 2) -> enter->nhập khoảng cách 1212 (lần 3)....

    Kết quả là:

    + đối tượng thứ 2 cách đối tượng gốc là: 1254

    + đối tượng thứ 3 cách đối tượng gốc là: 1254+6546, cách đối tượng thứ 2 là: 6546

    + đối tượng thứ 4 cách đối tượng gốc là: 1254+6546+1212, ...

    Mong các anh chị hiểu ý và giúp đỡ!

    Hề hề hề,

    Không hiểu ý bạn có phải cái này không???

    http://www.cadviet.com/upfiles/5/5194_copymultidist.lsp

     

    (defun c:cco (/ ss p0 p1 a d)
    (setq oldos (getvar "osmode"))
    (setvar "osmode" 0)
    (alert "\n Chon doi tuong can copy")
    (setq ss (ssget )
              p0 (getpoint "\n Chon diem goc")
              p1 (getpoint p0 "\n Chon diem dinh huong copy")
              a (angle p0 p1)
              e (entlast)  )
    (while (setq d (getdist "\n Nhap khoang cach can copy tiep theo: "))
           (command "copy" ss "" p0 (setq p0 (polar p0 a d)))
           (setq ss (ssadd))
           (while (setq e (entnext e))
                (setq ss (ssadd e ss))
           )
           (setq e (entlast))
    )
    (setvar "osmode" oldos)
    (princ)
    )
    
    • Vote tăng 1

  13. các bác pro chỉ em làm block kiểu này cần làm những bước gì với được không ? em tìm cách hiệu chỉnh nó mà khó quáhttp://www.cadviet.com/upfiles/5/134857_111715_cong_ubnd_tt_moc_chau.dwg

    Hề hề hề,

    Không biết bạn cần gì??? Hiệu chỉnh block hay tạo block.

    Để hiệu chỉnh thì bạn có thể explode dần từ ngoài vào trong cho tới chi tiết cần chỉnh.

    Để tạo block bạn phải tạo từ chi tiết thành các nhóm chi tiết và block dần từ trong ra ngoài.

    • Vote tăng 1

  14. Em có bài toán sau nhờ các bác cho ý kiến giúp

    Có 1 đường polyine chuẩn và các đường Polyline kín đã được tạo bằng boundary

    Giờ em muốn kiểm tra xem các Polyline trên nằm trên hoặc dưới đường chuẩn thì đổi màu hoặc chuyển thành lớp khác

    Trân trọng !48467_vi_tri.png

    Hề hề hề,

    Bài toán này không khó nếu như bạn chắc chắn các polyline kín này đều không bị chia cắt thành 2 phần bởi đượng pline chuẩn.

    Khi đó bạn có thể tạo vòng lặp kiểm tra mỗi một polyline kín thông qua các đỉnh của nó. Nếu có bất cứ đỉnh nào có tọa độ y lớn hơn tọa độ điểm giao của đường Yline đi qua đỉnh đó với pline chuẩn thì polyline kín đó nằm trên và ngược lại.

     

    Lưu ý rằng pline chuẩn là pline hở và không tự giao cắt nhau.

    • Vote tăng 1

  15. Mình có vài chục bản vẽ như thế đó bạn mình làm 1 công trình  phần mềm xuất ra vài trăm bản vẽ xong công trình này thì làm thêm công trình khác nên mình mới nhớ làm lisp chứ không copy cho rồi

    Hề hề hề,

    1/- Dùng thử cái lisp dưới đây nhé. Lưu ý rằng lisp chỉ đúng khi các bảng có cùng cấu trúc với các bảng trên bản vẽ bạn đã post. Nghĩa là tỷ lệ giữa kích thước của bảng với chiều cao text tiêu đề (SiZE) là tương đương., Tỷ lệ giữa các cột, các hàng là tương đương.

    2/- Bạn đã có kha khá kiến thức về lisp nên hãy đọc kỹ cái lisp này để hiểu được cách làm của mình và từ đó có thể suy ra cách làm cho các bảng có cấu trúc khác mà bạn cần phải làm.

    http://www.cadviet.com/upfiles/5/5194_choncaptext.lsp

     

     

    (defun c:sedote ( / oldos sstc p0 h p sst p1 ssc )
    (vl-load-com)
    (setq oldos (getvar "osmode"))
    (setvar "osmode" 0)
    (setq sstc (acet-ss-to-list (ssget (list (cons 0 "text")  (cons 1 "SIZE")))))
    (setq p0 (getpoint "\n Chon diem dat ket qua"))
    (command "undo" "be")
    (foreach txt sstc
        (setq h (cdr (assoc 40 (entget txt)))
                  p (cdr (assoc 11 (entget txt)))  )
        (if (= (sslength (setq sst (ssget "c" p (list (+ (car p) (* 15 h)) (+ (cadr p) h)) 
                                 (list (cons 0 "text") (cons 1 "\\M+3B0E8"))))) 1)
            (setq p1 (cdr (assoc 11 (entget (ssname sst 0)))))
        )
       ;;;;; (command "line" p p1 "")
        (setq p (list (- (car p) (* 9.5 h)) (- (cadr p) (* 3.75 h)))
                  p1 (list (+ (car p1) h) (- (cadr p1) (* 3.75 h)))    )
        (while (setq ssc (ssget "f" (list p p1) (list (cons 0 "text"))))
              (command "copy" ssc "" p p0)
              (setq p0 (polar p0 (* 1.5 pi) (* 2.5 h))
                       p (polar p (* 1.5 pi) (* 2.5 h))
                       p1 (polar p1 (* 1.5 pi) (* 2.5 h))    )
        )
    )
    (command "undo" "e")
    (setvar "osmode" oldos)
    (princ)
    )
    

  16. Cấu trúc của bảng không đồng nhất , Viec quét sẽ tiến hành hàng loạt  cho tấc cả các bảng . khi quét các bảng không có khung chi có giá trị text thôi nên không quan tâm đến cấu trúc của bảng. bảng vẽ của em có cả vài trăm bảng như vậy ngồi copy khoản 3h mới xong nổi.Em gởi bảng vẽ lại anh coi nhe khi quét nó chỉ có vậy thôi.http://www.cadviet.com/upfiles/5/115743_thong_ke_text_1.dwg

    Hề hề hề,

    1/- Nếu cấu truc bảng không đồng nhất thì việc quét một lần tât cả các bảng là khó khả thi bởi rất khó chọn đối tượng.

    2/- Theo ý mình thì không cần thiết phải xóa bỏ khung làm gì bởi lisp có thể chọn đối tượng text mà không quan tâm gì tới các đối tượng tạo khung.

    3/- Vị trí các bảng trên bản vẽ có theo một quy luật nào không hay tùy tiện???


  17.  Rất mong anh chị giúp đỡ  dùm em cái lisp này với . Em có lên diễn đàn tìm rồi tìm gần nghìn cái lisp nhưng chưa thấy cái lisp phù hợp yêu cầu công việc của em nên nay gởi bài anh chị coi giúp dùm em . Em gơỉ file mẩu , nội dung em cần em ghi trong file luôn .

    Rất mong sự giúp đỡ của anh chị ! Cảm ơn anh chị quan tâm giúp đỡ .http://www.cadviet.com/upfiles/5/115743_thong_ke_text.dwg

    Hề hề hề,

    Vấn đề của bạn, có một số điểm cần làm rõ hơn:

    1/- Cấu trúc của các bảng này có đồng nhất hay không??

    2/- Việc quét sẽ tiến hành lần lượt từng bảng hay quét một lần tất cả các bảng???

    3/- Nếu vấn đề chỉ là lấy các cặp số liệu đơn giản vây sao khôn copy số liệu của hai cột đầu ra vị trí khác, đơn giản và nhanh ra trò.

×