Đến nội dung


Hình ảnh
- - - - -

Vẽ ống côn cong 3D = VB


  • Please log in to reply
3 replies to this topic

#1 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 24 December 2007 - 08:27 AM

Mọi người có vẻ chưa mặn mà lắm với lập trình VB cho ACAD.

Tôi có chtrình dùng để vẽ ống côn cong 3D từng đoạn dùng cho chế tạo, chứ không phải ống côn cong liên tục.

Chương trình này nếu viết bằng VLisp theo tôi nghĩ là vô cùng khó khăn.

Link để tải: http://www.cadviet.com/upfiles/Reducing_Bend.zip
Thích hợp cho dân cơ khí, mời các bạn dùng thử.

Hình đã gửi
  • 0
Clear sky!

MF Rock collection.

#2 Nguyen Hoanh

Nguyen Hoanh

    biết lệnh adcenter

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

Đã gửi 24 December 2007 - 09:09 AM

Mọi người có vẻ chưa mặn mà lắm với lập trình VB cho ACAD.

Tôi có chtrình dùng để vẽ ống côn cong 3D từng đoạn dùng cho chế tạo, chứ không phải ống côn cong liên tục.

Chương trình này nếu viết bằng VLisp theo tôi nghĩ là vô cùng khó khăn.

Link để tải: http://www.cadviet.com/upfiles/Reducing_Bend.zip
Thích hợp cho dân cơ khí, mời các bạn dùng thử.

Cảm ơn bạn đã chia sẻ.
  • 0

#3 ssg

ssg

    biết lệnh adcenter

  • Vip
  • PipPipPipPipPipPipPip
  • 1228 Bài viết
Điểm đánh giá: 1087 (rất tốt)

Đã gửi 24 December 2007 - 10:55 AM

Mọi người có vẻ chưa mặn mà lắm với lập trình VB cho ACAD.

Tôi có chtrình dùng để vẽ ống côn cong 3D từng đoạn dùng cho chế tạo, chứ không phải ống côn cong liên tục.

Chương trình này nếu viết bằng VLisp theo tôi nghĩ là vô cùng khó khăn.

Link để tải: http://www.cadviet.com/upfiles/Reducing_Bend.zip
Thích hợp cho dân cơ khí, mời các bạn dùng thử.

Trước tiên, xin cám ơn nhiệt tình và sự chia sẻ của bạn. Ssg có vài ý kiến:

1) Không phải mọi người không mặn mà với lập trình VB cho CAD. Trên quan điểm sử dụng, VB, Lisp hay Arx đều tốt như nhau nếu nó mang lại hiệu quả thiết thực. Vấn đề là số members am hiểu về VB của chúng ta còn khiêm tốn nên chưa tạo nên phong trào. Nếu bạn thật sự quan tâm, bạn có thể là người khởi xướng cho chuyên mục VB bằng những bài viết hướng dẫn cụ thể, từ đơn giản đến phức tạp, giúp cho mọi người tiếp cận dần dần với VB. Nếu được như vậy, mình tin là chuyên mục VB sẽ phát triển. Và đến lúc nào đó sẽ được tách ra thành 1 diến đàn độc lập, "cạnh tranh bình đẳng" với Lisp.

2) Về chương trình khai triển ống côn cong của bạn, mình có nhận xét sau:
a- Chương trình gói gọn trong 1 file exe duy nhất, "click and play", không cần setup là quá tuyệt, rất hợp với ý mình. Có điều này mình muốn hỏi bạn: trên máy mình đang cài 2 bản Cad: 2002 và 2007. Mình có thể tùy chọn bản CAD mình thích để làm việc với chương trình của bạn được không? (hiện giờ nó luôn luôn buộc mình phải chạy với 2007)

b- Mình là con nhà cơ khí đây. Hình khai triển phải được hiểu là trải nó ra mặt phẳng, người ta cắt tole (hay giấy cũng được) theo đúng như hình, sau đó uốn cong và ghép lại sẽ được sản phẩm yêu cầu. Cái mà chương trình của bạn tạo ra chỉ là hình chiếu chứ không phải hình khai triển. Nói thật bạn đừng giận, người thiết kế cơ khí chẳng sử dụng trình của bạn để làm gì cả!

c- Lisp có thể làm một chương trình có giao diện và tính năng sử dụng y như của bạn không phải là "vô cùng khó khăn" như bạn nghĩ đâu. Nói là dễ cũng không phải, có lẽ xếp nó vào cỡ trung bình. Trước đây mình có làm vài đoạn lisp cho việc khai triển các hình thông dụng. Nhưng từ khi kiếm được trình SolidShape mình thôi không làm nữa, người ta làm sẵn cả rồi. Bạn có thể tham khảo ở đây để biết về SolidShape:
http://www.cadviet.com/forum/index.php?showtopic=1977
  • 0

#4 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 24 December 2007 - 01:59 PM

Cảm ơn ssq đã góp ý cho mình.

Các chương trình mình viết chỉ yêu cầu máy tính có cài đặt .NET Framwork là được, không cần cài đặt.
Tuy nhiên đây là một trong những chương trỉnh phục vụ cho công việc của mình và muốn được chia sẽ với những ai cảm thấy cần thiết.
Sử dụng từ "Khai triển" đúng là không chính xác.

Trong các chtr sắp tới mình sẽ bổ sung thêm phần yêu cầu chỉ định làm việc với 1 phiên bản bất kỳ của ACAD
  • 0
Clear sky!

MF Rock collection.