Đến nội dung


Hình ảnh
- - - - -

Nhúng AutoCAD vào ứng dụng dot NET


  • Please log in to reply
14 replies to this topic

#1 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 02 November 2011 - 09:41 AM

mời các bạn xem thử

Chú ý: chống chỉ định đối với những bạn nào ko rành về AutoCAD.
Mình ko chịu trách nhiệm nếu AutoCAD của bạn có vấn đề gì sau khi chạy chương trình.

Trong một số trường hợp AutoCAD sẽ bị mất toolbar và ribbon -> cách giải quyết là select lại workspace để CAD tự load lại.

Nếu bạn ko hiểu những ý trên thì ko nên load chương trình về thử.

Dùng được tất cả các lệnh của AutoCAD trong chương trình của bạn.
Yêu cầu: Máy phải có cài AutoCAD :ph34r:

http://www.youtube.com/watch?v=FvKPPlv2Ib4&feature=youtu.be

Link down clicp: http://www.mediafire...uorxqmvhlvlzklu
Link down Application: http://www.mediafire...n3vbmqeol8gc7ly

Have fun!
  • 3

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#2 zoro107

zoro107

    biết vẽ ellipse

  • Members
  • PipPip
  • 51 Bài viết
Điểm đánh giá: 10 (tàm tạm)

Đã gửi 02 November 2011 - 10:07 AM

Detailing nói thế thì coi cấm người ta hỏi luôn rồi .. :D
Mình cũng biết sơ về .Net. nhưng cái ý ở topic này mình không hiểu bạn muốn nói vấn đề gì. Vì suy cho cùng chúng ta dùng .net để lập trình tự động hóa mà rút ngắng khoảng thời gian thể hiện bản vẽ. Ví như ở cái Avi của bạn thì không thấy kết quả gì cả. Nếu ý của Bạn chỉ là nhúng Cad và .net thì cho mình sorry nhé.... Vì mình cũng đang theo hướng này, không biết bạn suy nghĩ gì nếu mình hỏi bạn có thể dùng net để tự trích xuất thống kê ra excel, dùng net để tự mở bv lên và cập nhật lại các bloc đã chỉ định, có thể không bạn. Vì nếu làm được thì nhiệm vụ của chúng ta còn lại chỉ là sửa block,thống kê thư viện block thôi còn tất cả cái thể hiện bv chỉ là 1 lân click chuột...
  • 0

#3 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 02 November 2011 - 10:17 AM

Có thể áp dụng cho Preview thật hơn ấy nhỉ :)
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#4 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 02 November 2011 - 10:20 AM

Detailing nói thế thì coi cấm người ta hỏi luôn rồi .. :D
Mình cũng biết sơ về .Net. nhưng cái ý ở topic này mình không hiểu bạn muốn nói vấn đề gì. Vì suy cho cùng chúng ta dùng .net để lập trình tự động hóa mà rút ngắng khoảng thời gian thể hiện bản vẽ. Ví như ở cái Avi của bạn thì không thấy kết quả gì cả. Nếu ý của Bạn chỉ là nhúng Cad và .net thì cho mình sorry nhé.... Vì mình cũng đang theo hướng này, không biết bạn suy nghĩ gì nếu mình hỏi bạn có thể dùng net để tự trích xuất thống kê ra excel, dùng net để tự mở bv lên và cập nhật lại các bloc đã chỉ định, có thể không bạn. Vì nếu làm được thì nhiệm vụ của chúng ta còn lại chỉ là sửa block,thống kê thư viện block thôi còn tất cả cái thể hiện bv chỉ là 1 lân click chuột...

Chào bạn,
Cuối post trên mình ghi Have fun: có nghĩa là có bạn xem chỉ để biết là .NET có thể làm thế, có bạn sẽ thấy nó hữu ích cho việc nào đó.
câu chống chỉ định để bạn nào ko rành có thể ko thử vì CAD mà hư lại ko biết sửa thì khổ. hehehe
Về 2 câu bạn hỏi:
  • có thể dùng net để tự trích xuất thống kê ra excel => có thể chỉ cần bạn muốn trích xuất cái gì (thuộc tính gì của loại đối tượng nào - kể cả những thứ bạn ko thấy trên bản vẽ :D)
  • dùng net để tự mở bv lên và cập nhật lại các bloc đã chỉ định => có thể được

Ngoài ra nó còn làm được nhiều thứ hơn nữa :D

Những gì bạn thao tác bằng tay (manual) được thì .NET làm được hết, có những việc .NET làm được chưa chắc bạn đã làm bằng tay được.

Thân!
  • 0

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#5 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 02 November 2011 - 10:24 AM

Nhân tiện topic ketxu hỏi 1 câu ngoài lề : Có việc set password cho bản vẽ tự động (security của CAD) mình vẫn chưa tìm ra giải pháp, Detail nếu đã nghiên cứu hoặc nghe qua ở đâu cho ketxu biết với :( . Liệu sau khi nhúng CAD vào thì có thể làm được không ?
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#6 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 02 November 2011 - 10:42 AM

Nhân tiện topic ketxu hỏi 1 câu ngoài lề : Có việc set password cho bản vẽ tự động (security của CAD) mình vẫn chưa tìm ra giải pháp, Detail nếu đã nghiên cứu hoặc nghe qua ở đâu cho ketxu biết với :( . Liệu sau khi nhúng CAD vào thì có thể làm được không ?

Mình ko hiểu ý Ket lắm
Ket muốn set password tự động cho nhiều bản vẽ 1 lúc
hay
Ket muốn hỏi sau khi nhúng vào thì CAD có mở dc ko

cái này là nhúng nghuyên phần xử lý của AutoCAD vào trong Own Application. Ket có thể load lisp, vba, arx, .net App vào vì nó chính là AutoCAD mà :P
  • 0

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#7 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 02 November 2011 - 10:45 AM

Set password Detail ạ. Mở thì mình xử lý dễ hơn ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#8 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 02 November 2011 - 10:47 AM

Set password Detail ạ. Mở thì mình xử lý dễ hơn ^^

Ket viết cái lisp set pass tự động rồi load vào chạy bình thường như các lisp khác thôi
  • 0

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#9 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 02 November 2011 - 11:01 AM

Ket viết cái lisp set pass tự động rồi load vào chạy bình thường như các lisp khác thôi


^^ Mình chưa làm được việc set pass tự động (1 việc manual mà nghĩ mãi chưa ra cách auto), thấy detail khẳng định vậy nên mới hỏi mà ^^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#10 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 02 November 2011 - 11:20 AM


^^ Mình chưa làm được việc set pass tự động (1 việc manual mà nghĩ mãi chưa ra cách auto), thấy detail khẳng định vậy nên mới hỏi mà ^^

Ket thử cái này xem (VBA)

Public Sub SaveWithEncryption()
Dim oSecurity As New AcadSecurityParams
With oSecurity
.Action = AcadSecurityParamsType.ACADSECURITYPARAMS_ENCRYPT_DATA
.Algorithm = AcadSecurityParamsConstants.ACADSECURITYPARAMS_ALGID_RC4
.Comment = "Add comment to drawing"
.Issuer = "Your Company Name"
.KeyLength = 40
'AutoCAD converts all passwords to uppercase before applying them
.Password = UCase("br549")
.ProviderName = "Microsoft Base Cryptographic Provider v1.0"
.ProviderType = 1
.SerialNumber = "BR549"
.Subject = "The Flying DeLorean"
.TimeServer = "NIST(time.nist.gov)"
End With
ThisDrawing.SaveAs "C:\MyDrawing.dwg", , oSecurity
End Sub



p/s: Mình biết có thể lên mặt trăng được nhưng chưa lên được lần nào heheh
Have fun
  • 1

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#11 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 02 November 2011 - 11:28 AM

Tks Detailing nhiều, lúc nào rỗi mình thử dịch sang lisp và Net xem sao ^^
P/S : mình cũng vừa tìm thấy nó trong Develop và các thông tin trong MSDN, quả đúng là có người chỉ đường 1 phát sáng luôn. Tks Detail lần nữa
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#12 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 02 November 2011 - 12:12 PM

Hầu như tất cả các chương trình đều cung cấp sẵn thư viện để nhúng.
Ngay từ ACAD R14 cũng đã có sẵn rồi, Excel hay Word cũng nhúng được.

Phần nhúng có sẵn cái hay riêng của nó, vì thực tế nó là một Preview xịn và chiếm dụng ít tài nguyên hơn là một phiên của AutoCAD.

Ý của mình mong muốn có 1 cái preview độc lập, xử lý dữ liệu độc lập và lúc nào cần thì mới xuất dữ liệu qua Acad.
  • 0
Clear sky!

MF Rock collection.

#13 xanhnhnn280683

xanhnhnn280683

    Chưa sử dụng CAD

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

Đã gửi 17 November 2011 - 10:10 AM

mời các bạn xem thử

Chú ý: chống chỉ định đối với những bạn nào ko rành về AutoCAD.
Mình ko chịu trách nhiệm nếu AutoCAD của bạn có vấn đề gì sau khi chạy chương trình.

Trong một số trường hợp AutoCAD sẽ bị mất toolbar và ribbon -> cách giải quyết là select lại workspace để CAD tự load lại.

Nếu bạn ko hiểu những ý trên thì ko nên load chương trình về thử.

Dùng được tất cả các lệnh của AutoCAD trong chương trình của bạn.
Yêu cầu: Máy phải có cài AutoCAD :ph34r:

http://www.youtube.com/watch?v=FvKPPlv2Ib4&feature=youtu.be

Link down clicp: http://www.mediafire...uorxqmvhlvlzklu
Link down Application: http://www.mediafire...n3vbmqeol8gc7ly

Have fun!

:wacko: Xin chào!
Em là sinh viên, học lập trình, anh cho em xin suorce bài trên code vb.net hay code C# cũng được
Em cám ơn anh nhiều nhé
xanhnhnn280683@gmail.com Kính chào :mellow:
  • 0

#14 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 17 November 2011 - 10:31 AM

:wacko: Xin chào!
Em là sinh viên, học lập trình, anh cho em xin suorce bài trên code vb.net hay code C# cũng được
Em cám ơn anh nhiều nhé
xanhnhnn280683@gmail.com Kính chào :mellow:

Chào bạn,
như đã trả lời trong email cho bạn và cũng đã thảo luận vấn đề xem source code của người khác trên diễn đàn nên mình sẽ ko share source code chương trình.
Thân!
  • 0

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341


#15 Detailing

Detailing

    biết lệnh imageclip

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

Đã gửi 18 November 2011 - 08:51 AM

Hầu như tất cả các chương trình đều cung cấp sẵn thư viện để nhúng.
Ngay từ ACAD R14 cũng đã có sẵn rồi, Excel hay Word cũng nhúng được.

Phần nhúng có sẵn cái hay riêng của nó, vì thực tế nó là một Preview xịn và chiếm dụng ít tài nguyên hơn là một phiên của AutoCAD.

Ý của mình mong muốn có 1 cái preview độc lập, xử lý dữ liệu độc lập và lúc nào cần thì mới xuất dữ liệu qua Acad.

hihi giờ mới thấy comment của bạn, sorry.
Theo ý bạn thì bạn nên ,ua thư viện LiteCAD của Kolbasoft theo link này: http://www.kolbasoft.com/index.html thì hơn là ngồi viết lại cái control preview.
Tại sao? vì muốn đọc được file dwg hay dxf bạn phải nghiên cứu lại cấu trúc file và thể hiện lại trên preview (có thể bạn phải biết thêm lập trình directX hoặc openGL.
Mình thấy bạn cũng có 1 cái preview khá tốt ở topic này: http://www.cadviet.c...opic=31160&st=0
Các bạn nào có ý khác có thể đóng góp nha.
Thanks All
  • 0

Ideas don't matter, execution does!

1908412_308002392716743_8165279281236341