tailieunhanh - Phát triển AutoCAD bằng ActiveX & VBA - Chương 3

ĐIỀU KHIỂN MÔI TRƯỜNG AutoCAD Trong chương này Chương này trình bày những vấn đề cơ bản cần biết để xây dựng một ứng dụng trong AutoCAD cũng như sẽ giải thích rõ cách thức điều khiển môi trường AutoCAD và cách làm việc hiệu quả trong môi trường này. | ĐIỀU KHIỂN MÔI TRƯỜNG AutoCAD 3 Trong chương này Mở Lưu và Đóng các bản vẽ Chương này trình bày những vấn đề cơ bản cần biết để xây dựng một ứng dụng trong AutoCAD cũng như sẽ giải thích rõ cách thức điều khiển môi trường AutoCAD và cách làm việc hiệu quả trong môi trường này. Thiết lập các lựa chọn trong AutoCAD Điều khiển cửa sổ ứng dụng Điều khiêỉn cửa sổ bản vẽ Thiết lập lại các đối tượng hiện hành Gán và lấy biến hệ thống Vẽ với độ chính xác cao Nhắc người dùng nhập dữ liệu Truy xuất dòng lệnh của AutoCAD Thao tác khi không mở bản vẽ nào Nhập vào các định dạng khác Xuất sang các định dạng khác Phát triển ứng dụng ActiveX và VBA 61 1. Mở Lưu và Đóng các bản vẽ Tập Documents và đối tượng Document cho phép thực hiện các hàm liên quan đến tệp trong AutoCAD. Để tạo một bản vẽ mới hoặc mở một bản vẽ đã có ta phải sử dụng các phương thức trong tập đối tượng Documents. Phương thức Add sẽ tạo một bản vẽ mới và thêm bản vẽ đó vào tập đối tượng Documents. Phương thức Open sẽ mở một bản vẽ đã có. Ngoài ra còn có phương thức Close trong tập đối tượng Documents dùng để đóng tất các các bản vẽ đang mở trong phiên làm việc của AutoCAD. Để lưu nhập hoặc xuất một bản vẽ ta sử dụng các phương thức của đối tượng Document Save Save As Import và Export. . Mở bản vẽ ir của bản vẽ. Ta ẽ đã có trong hệ thống. Ví dụ sau sử dụng phương thức Open để mở một bản vẽ Visual Basic dùng để kiểm tra sự tồn tại của tệp trước khi tiến nên thay đổi tên bản vẽ hoặc đường dẫn để chỉ đến một Sub Ch3 OpenDrawing Dim dwgName As String dwgName c Program Files acad2000 sample If Dir dwgName Then dwgName Else MsgBox File dwgName does not exist. End If End Sub . Tạo bản vẽ mới d để tạo một bản vẽ mới dựa trên khuôn thức mặc định. Sub Ch3 NewDrawing Dim doc Set doc End Sub As AcadDocument . Lưu bản vẽ Có thể dụng phương thức Save hoặc Save As để lưu bản vẽ. Lưu bản vẽ hiện hành Ví dụ sau sẽ lưu bản vẽ hiện hành

TỪ KHÓA LIÊN QUAN
crossorigin="anonymous">
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.