Đến nội dung


Hình ảnh
- - - - -

VBplot 2010


  • Please log in to reply
93 replies to this topic

#1 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 27 February 2011 - 08:28 PM

Link phiêm bản mới.
vbplot_2010
hướng dẫn
http://www.youtube.com/watch?v=Ddg5PpF5x-A
  • 9
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#2 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 28 February 2011 - 10:48 AM

Bác nào test giúp em cái. Thấy một số người báo là không chạy trên một số mày. Cái này còn mới nên cần sự giúp đỡ của mọi người. Thank!!!
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#3 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1435 Bài viết
Điểm đánh giá: 1426 (rất tốt)

Đã gửi 28 February 2011 - 12:04 PM

Bác nào test giúp em cái. Thấy một số người báo là không chạy trên một số mày. Cái này còn mới nên cần sự giúp đỡ của mọi người. Thank!!!

Chạy trên Cad 2010, win XP SP3, .Net 3.5 : không thấy máy in nào cả.
Click vô "Tùy chỉnh" hay "Chỉnh nét in" , không thấy "nhúc nhích" gì cả.
Hình đã gửi
  • 1

#4 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 28 February 2011 - 12:12 PM

Chạy trên Cad 2010, win XP SP3, .Net 3.5 : không thấy máy in nào cả.
Click vô "Tùy chỉnh" hay "Chỉnh nét in" , không thấy "nhúc nhích" gì cả.
Hình đã gửi

Bác bị lỗi giống hệt ketxu. Nếu bình thường thì nó đã load máy in và nét in rồi. Cám ơn Bác đã quan tâm, để em sửa rồi nhờ các Bác check tiếp. Thank!
  • 0
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#5 dkkx3a

dkkx3a

    biết lệnh trim

  • Members
  • PipPipPip
  • 190 Bài viết
Điểm đánh giá: 57 (tàm tạm)

Đã gửi 28 February 2011 - 01:13 PM

Em dùng ACAD2009, winsp2 chạy bình thường, ngon bổ. Có cái lúc chọn khung in nếu chọn ko đúng nó bắt chọn hoài chọn mãi mãi......bất tiện chút :blush:

@: à chạy đc cho ACad2011 ko bạn, em duyệt thì thấy không xuất hiện máy in nào cả. :wacko: (thấy bạn ghi là VB2010, em gà không biết chạy đc cho CAD2011 ko, test thử thì như thế ạ)

@ lần test tiếp theo: có lúc bị lỗi như bác Giabach, có lúc như trên là không có máy in, lần gần nhất thì có đủ mọi chức năng. Chương trình chạy chưa ổn định bạn ạ. Bạn xem lại nhé. và tốc độ hơi chậm thì phải !! Chúc bạn sớm thànhcồngg :wub:
  • 1
TỰ SỰ
Biển vào chiều buồn giữa cô liêu
Sóng vỗ bờ bạc đầu con nước
Khi biển động như lòng ta chợt động
Biển ồn ào nhưng thực rất dịu êm.......

#6 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 28 February 2011 - 01:36 PM

Em dùng ACAD2009, winsp2 chạy bình thường, ngon bổ. Có cái lúc chọn khung in nếu chọn ko đúng nó bắt chọn hoài chọn mãi mãi......bất tiện chút :blush:

@: à chạy đc cho ACad2011 ko bạn, em duyệt thì thấy không xuất hiện máy in nào cả. :wacko: (thấy bạn ghi là VB2010, em gà không biết chạy đc cho CAD2011 ko, test thử thì như thế ạ)

@ lần test tiếp theo: có lúc bị lỗi như bác Giabach, có lúc như trên là không có máy in, lần gần nhất thì có đủ mọi chức năng. Chương trình chạy chưa ổn định bạn ạ. Bạn xem lại nhé. và tốc độ hơi chậm thì phải !! Chúc bạn sớm thànhcồngg :wub:

Bạn giúp mình test thử cái này nhé. Đã fix chọn đối tượng (ấn esc để huỷ chọn). và đã cải thiện tốc độ xử lý.
BS: Đã test trên win7 32bit, cad2007 chạy ngon.
  • 0
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#7 dkkx3a

dkkx3a

    biết lệnh trim

  • Members
  • PipPipPip
  • 190 Bài viết
Điểm đánh giá: 57 (tàm tạm)

Đã gửi 28 February 2011 - 03:40 PM

Đã nhanh hơn rồi bạn ạ, nhưng lại có một số lỗi nữa rồi:
- Lần load đầu tiên có lỗi báo là "không có nét in" thì phải, mình nhìn qua rồi OK nên nhớ lôm côm :wacko:
- Nếu mình select khung tên 380x275 thì nó nhận và thông báo số bản vẽ (nếu có nhiều trong vùng chọn), nhưng khi select khung 420x297 thì sau khi chọn khung mẫu rồi thì chọn vùng cần in thì Ctr tịt luôn, không lên nữa. Bật lại ctr và làm lại thì vẫn vậy, xem trong task manager thì có rất nhiều cái plot.exe mỗi cái ngốn khoảng 19.000k

Không biết sao nữa bạn ạ! bạn xem lại.......... :rolleyes:
  • 0
TỰ SỰ
Biển vào chiều buồn giữa cô liêu
Sóng vỗ bờ bạc đầu con nước
Khi biển động như lòng ta chợt động
Biển ồn ào nhưng thực rất dịu êm.......

#8 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1435 Bài viết
Điểm đánh giá: 1426 (rất tốt)

Đã gửi 01 March 2011 - 01:37 PM

Em dùng ACAD2009, winsp2 chạy bình thường, ngon bổ. Có cái lúc chọn khung in nếu chọn ko đúng nó bắt chọn hoài chọn mãi mãi......bất tiện chút :blush:

@: à chạy đc cho ACad2011 ko bạn, em duyệt thì thấy không xuất hiện máy in nào cả. :wacko: (thấy bạn ghi là VB2010, em gà không biết chạy đc cho CAD2011 ko, test thử thì như thế ạ)

@ lần test tiếp theo: có lúc bị lỗi như bác Giabach, có lúc như trên là không có máy in, lần gần nhất thì có đủ mọi chức năng. Chương trình chạy chưa ổn định bạn ạ. Bạn xem lại nhé. và tốc độ hơi chậm thì phải !! Chúc bạn sớm thànhcồngg :wub:

test trên Cad 2010, win XP SP3, .Net 3.5

Thông báo khi khởi động.
Hình đã gửi

Sau khi chọn vùng in, Cad tính toán hơi bị lâu (15~30 giây cho 2 block khung tên)

Thông báo khi chọn "Xem" hoặc "Print"
Hình đã gửi
  • 0

#9 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 01 March 2011 - 03:47 PM

test trên Cad 2010, win XP SP3, .Net 3.5

Thông báo khi khởi động.
Hình đã gửi

Sau khi chọn vùng in, Cad tính toán hơi bị lâu (15~30 giây cho 2 block khung tên)

Thông báo khi chọn "Xem" hoặc "Print"
Hình đã gửi

Do nét in không load được nên các nút kia bị lỗi là phải bác ạ. Em đang tiếp tục test trên các hệ điều hành và cad version khác nhau.
Cái ổ 320GB vừa bị teo mất hết bộ cài Cad để test Bác ạ.
Do cái visual Basic 2010 này em vừa mới làm quen nên còn nhiều cái chưa biết. Ví dụ như bị lỗi Warning CA1060 mà không thể nào loại bỏ nó được mặc dù đã chuyển các hàm API vào trong nativeMethods
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#10 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 02 March 2011 - 03:36 PM

Chào các Bạn!
Cám ơn các bạn đã test giúp mình. Nay mình đã viết xong và đã fix một số lỗi.
Mình up lên đây cho bạn nào có nhu cầu sử dụng thì download vè dùng. Trong quá trình sử dụng nếu có gì thắc mắc thì cứ PM mình sẽ giải đáp.
Chương trình chỵa ổn định sẽ có giao diện như sau:
Lúc khởi động:
Hình đã gửi
giao diện chính của chương trình:
Hình đã gửi
Tiện ích xem và in những trang cần in:
Hình đã gửi
Thông báo kết quả khi in và đánh dấu những trang đã in:
Hình đã gửi
Đây là linh download bản hiện tại:
My plot
  • 4
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#11 duyhung

duyhung

    biết vẽ rectang

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

Đã gửi 03 March 2011 - 02:52 PM

Chọn điểm 1 và 2 là thế nào thế hả bác Tú.
Em chọn mãi mà không được, thanks bác nhiều!
  • 0
Song va chien dau!

#12 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 03 March 2011 - 03:09 PM

Chọn điểm 1 và 2 là thế nào thế hả bác Tú.
Em chọn mãi mà không được, thanks bác nhiều!

Điểm 1 và 2 là giới hạn vùng chọn để in. Tức là như thế này.
Bạn có 10 bản vẽ chẳng hạn. Đầu tiên chương trình yêu cấu bạn chọn khung điển hình thì bạn chọn vào khung tên bất kì (có thể là block hoặc rectang) sau đó chương trình yêu cầu chọn diểm 1 và điểm 2 thì bạn chọn sao cho vùng chọn bao chùm những khung cần in. Chương trình sẽ tự đọng lọc nhữnh khung tên mà bạn chọn trong vùng chọn đó và hiển thị số bản in trên giao diện chương trình.
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#13 duyhung

duyhung

    biết vẽ rectang

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

Đã gửi 03 March 2011 - 04:19 PM

Điểm 1 và 2 là giới hạn vùng chọn để in. Tức là như thế này.
Bạn có 10 bản vẽ chẳng hạn. Đầu tiên chương trình yêu cấu bạn chọn khung điển hình thì bạn chọn vào khung tên bất kì (có thể là block hoặc rectang) sau đó chương trình yêu cầu chọn diểm 1 và điểm 2 thì bạn chọn sao cho vùng chọn bao chùm những khung cần in. Chương trình sẽ tự đọng lọc nhữnh khung tên mà bạn chọn trong vùng chọn đó và hiển thị số bản in trên giao diện chương trình.

Cái này đòi fai cài netframework phải không bác :-/
  • 0
Song va chien dau!

#14 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 03 March 2011 - 04:32 PM

Cái này đòi fai cài netframework phải không bác :-/

Cái này chỉ cần netframework 2.0 là được
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#15 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1435 Bài viết
Điểm đánh giá: 1426 (rất tốt)

Đã gửi 04 March 2011 - 03:56 PM

Cái này chỉ cần netframework 2.0 là được

test trên Cad 2010, win XP SP3, .Net 3.5 kết quả OK.

Tuy nhiên sau khi in thì vẫn còn 1 chút "rác" bác ạ. (line và text số trang)
Có lẽ đây là ý đồ của tác giả để phân biệt các trang in, nhưng Bác xử lý cái này sao cho dễ "dọn dẹp" 1 chút thì hay hơn.
  • 1

#16 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 04 March 2011 - 04:11 PM

test trên Cad 2010, win XP SP3, .Net 3.5 kết quả OK.

Tuy nhiên sau khi in thì vẫn còn 1 chút "rác" bác ạ. (line và text số trang)
Có lẽ đây là ý đồ của tác giả để phân biệt các trang in, nhưng Bác xử lý cái này sao cho dễ "dọn dẹp" 1 chút thì hay hơn.

Cám ơn Bác đã quan tâm!
Vấn đề don các text đánh dấu thì em gộp chung với lại nút chọn đối tượng. Khi ấn nút chọn đối tượng thì chương trình sẽ xoá hết các text đánh dấu trước khi chọn đối tượng. Vì em không muốn phát sinh thêm nút nên làm như vậy. Bác có cao kiến gì để em sửa. Các text đó không ảnh hưởng gì đến lúc in vì nó nằm trong layer không cho in.
  • 2
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#17 VUVUZELA

VUVUZELA

    biết lệnh chamfer

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

Đã gửi 05 March 2011 - 01:11 PM

Cám ơn Bác đã quan tâm!
Vấn đề don các text đánh dấu thì em gộp chung với lại nút chọn đối tượng. Khi ấn nút chọn đối tượng thì chương trình sẽ xoá hết các text đánh dấu trước khi chọn đối tượng. Vì em không muốn phát sinh thêm nút nên làm như vậy. Bác có cao kiến gì để em sửa. Các text đó không ảnh hưởng gì đến lúc in vì nó nằm trong layer không cho in.


Bác chỉ cần tạo 1 TEXT xiên (= layer Defpoints, chiều cao chữ lớn) theo line màu xanh là được rồi (không cần vẽ thêm line cho rắc rối)
Người dùng PLOT xong có thể dùng lệnh :
1. Command : SSX (để lọc TEXT xieen có layer Defpoints)
2. Command : ERASE => select object : P => là nhanh nhất
  • 0

Hệ thống Liên Kết, Thiết Kế Tự Động

ttps://www.facebook...etThietKeTuDong


#18 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 05 March 2011 - 02:03 PM

Bác chỉ cần tạo 1 TEXT xiên (= layer Defpoints, chiều cao chữ lớn) theo line màu xanh là được rồi (không cần vẽ thêm line cho rắc rối)
Người dùng PLOT xong có thể dùng lệnh :
1. Command : SSX (để lọc TEXT xieen có layer Defpoints)
2. Command : ERASE => select object : P => là nhanh nhất

Với những người không biết sử dụng mã lisp thì lại là vấn đề bác ạ. Muốn xóa thì chỉ cần ấn nút chọn đối tượng rồi thoát chương trình là được.
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!

#19 ketxu

ketxu

    Copier - Paster - Editor

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

Đã gửi 05 March 2011 - 02:58 PM

Tại sao bác không chuyển sub đó vào event Form Unload ??
  • 1

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


#20 phamngoctukts

phamngoctukts

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1107 Bài viết
Điểm đánh giá: 696 (tốt)

Đã gửi 05 March 2011 - 04:38 PM

Tại sao bác không chuyển sub đó vào event Form Unload ??

Có thể cho vào event close chứ. Nếu để event Form_load thì muốn xóa đối tượng thì lại phải tắt CT rồi bật lại à. Thank!!!
  • 1
Tất cả vì sự phát triển của diễn đàn ...
Cám ơn đừng nói lời suông mà hãy nhấn Hình đã gửi!