Giáo trình phân tích các phương pháp lập trình trên autocad p4

Tham khảo tài liệu 'giáo trình phân tích các phương pháp lập trình trên autocad p4', công nghệ thông tin, đồ họa - thiết kế - flash phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả
Nội dung trích xuất từ tài liệu:
Giáo trình phân tích các phương pháp lập trình trên autocad p4 MIRRTEXT Xác định cách thức khi lấy đối xứng đối với văn bản. Bằng 0: giữ nguyên chiều văn bản; bằng 1: đổi chiều văn bản. TILEMODE Xác định không gian hiện hành là không gian mô hình hay không gian in. Bằng 0: không gian in; bằng 1: không gian mô hình. ZOOMFACTOR Xác định tỷ lệ phần trăm thu/phóng bản vẽ khi lăn phím chuột giữa. TEXTFILL Điều khiển cách hiển thị văn bản TrueType. Bằng 0: chỉ vẽ đường biên văn bản; bằng 1: vẽ cả đường biên và tô đầy văn bản. 5.2. Tạo mới đối tượng hình học Mô hình đối tượng trong AutoCAD thực chất là sự mô tả lại hầu như tất các các đối tượng mà người dùng có thể tạo ra trong AutoCAD theo cách vẽ thông thường, cho nên để lập trình tạo ra các đối tượng hình học bằng VBA thì người dùng cần phải thông thuộc cách tạo ra đối tượng đó bằng lệnh thông thường trực tiếp trong AutoCAD. Trong AutoCAD, để hỗ trợ người dùng thao tác nhanh, một đối tượng hình học có thể được tạo ra theo nhiều phương thức khác nhau, chẳng hạn như khi tạo đường tròn trong AutoCAD, người dùng có thể tạo theo 4 cách khác nhau: Xác định tâm và bán kính, Xác định 2 điểm tạo nên đường kính đường tròn, Xác định ba điểm ngoại tiếp đường tròn, Xác định hai đường tang và bán kính. Hoặc để tạo một cung tròn, trong AutoCAD, người dùng có tới 11 phương thức để lựa chọn như hình bên. Tuy nhiên, với VBA trong AutoCAD, mỗi đối tượng chỉ có thể được tạo bằng một phương thức với một loại thông số nhất định, ví dụ như đối với đường tròn, người lập trình chỉ có thể tạo ra với các thông số là vị trí tâm và bán kính của đường tròn. Hầu hết các đối tượng hình học trong AutoCAD, tuy khác nhau về hìh dáng, nhưng cách tạo ra chúng bằng VBA lại tương tự nhau, cho nên trong phần này chỉ giới thiệu cách thức tạo ra một số đối tượng hình học chính trong AutoCAD, bao gồm: Đối tượng Point; Đối tượng dạng đường cong: Arc, Circle; Đối tượng văn bản: Text; Các đối tượng dạng đường có chiều dài hữu hạn như Line, Polyline... 5.2.1. Xác định nơi chứa đối tượng AutoCAD nhóm các đối tượng hình học trong tập đối tượng ModelSpace, PaperSpace và trong đối tượng Block. Tuy nhiên, thường được sử dụng nhất là hai tập đối tượng ModelSpace và PaperSpace: ModelSpace (không gian mô hình) là một phần của bản vẽ, là nơi để người dùng tạo các đối tượng hình học để tạo nên mô hình hoặc bản vẽ mà người dùng dự định thiết kế. Hầu hết tất cả các thao tác xây dựng bản vẽ đều được thực hiện trên không gian mô hình. Trong AutoCAD, chỉ có một không gian mô hình, tương ứng với không gian mô hình này chính là thẻ Model nằm ở góc dưới màn hình bản vẽ trong AutoCAD. 218 CHƯƠNG V: LẬP TRÌNH TRÊN AUTOCAD  PaperSpace (không gian in) cũng cho phép chứa các đối tượng hình học như trong không gian mô hình, tuy nhiên mục đích chính của không gian in là để phục vụ cho quá trình sắp xếp bản vẽ và in ấn. Không gian in thường chứa các khung nhìn theo một tỷ lệ định trước thể một phần của bản vẽ trong không gian mô hình, hoặc các bảng biểu, ghi chú,… Trong AutoCAD, người dùng có thể tạo nhiều không gian in khác nhau, mỗi không gian in tương ứng với một thẻ Layout nằm ở góc dưới màn hình bản vẽ trong AutoCAD. Để truy cập đến các không gian in có trong bản vẽ, có thể sử dụng tập đối tượng Layouts có trong đối tượng kiểu Document. Tại một thời điểm, trong AutoCAD chỉ có một không gian là hiện hành, có thể là không gian mô hình hoặc không gian in. Để xác định xem không gian nào là không gian hiện hành, người lập trình có thể sử dụng thuộc tính ActiveSpace có trong đối tượng kiểu Document. Thuộc tính này chỉ nhận giá trị là 2 hằng số sau: Hằng số Giá trị tương ứng acModelSpace 1 acPaperSpace 0 Ví dụ sau sẽ hiển thị thông báo tương ứng với không gian hiện hành của AutoCAD: Sub VD_ActiveSpace() If ThisDrawing.ActiveSpace = acModelSpace Then MsgBox Không gian hiện hành là không gian mô hình. Else MsgBox Không gian hiện hành là không gian in. End If End Sub Ngoài ra người dùng còn có thể chuyển đổi giữa không gian in và không gian mô hình bằng cách gán giá trị cho thuộc tính ActiveSpace. Đoạn mã sau sẽ thực hiện thao tác này: Sub VD_ChuyenKhongGian() With ThisDrawing If .ActiveSpace = acModelSpace Then .ActiveSpace = acPaperSpace Else .ActiveSpace = acModelSpace End If End With End Sub Hoặc đơn giản hơn, chỉ cần sử dụng một dòng lệnh sau: Sub VD_ChuyenKhongGian() ThisDrawing.ActiveSpace = (ThisDrawing.ActiveSpace + 1) Mod 2 End Sub GỢI Ý Có thể chuyển đổi giữa các không gian bằng cách gán giá trị cho biến hệ thống TILEMODE. Nếu TILEMODE=1, không gian mô hình sẽ là không gian hiện hành. Nếu bằng 0, không gian in sẽ là không gian hiện hành. 5.2.2. Khai báo và tạo đối tượng hình học Tất các các đối tượng trong AutoCAD (kể cả đối tượng hình học và phi hình học) đều có thể được khai báo trong VBA theo dạng thức Acad. Chẳng hạn như đối tượng 219 đường thẳng – Line thì đối tượng tương ứng trong VBA sẽ có kiểu là AcadLine. Ví dụ sau minh hoạ cách khai báo một đối tượng đường tròn trong VBA: Dim CircleObj as AcadCircle Người dùng có thể tạo mới đối tượng hình học trong không gian mô hình hoặc trong không gian in. Để tạo đối tượng mới, sử dụng phương thức AddXXX có trong tập đối tượng ModelSpace và PaperSpace, trong đó XXX là tên của loại đối tượng hình học cần tạo. Cú pháp như sau: Set Biến_đối_tượng = Object.AddXXX(Danh_sách_tham_số) Trong đó, Object là tập đối tượng ModelSpace hoặc PaperSpace. Mỗi phương thức AddXXX sẽ ...