|
|
AutoCAD一共有9个属于选项的对象，每一对象描述了选项对话框中的一个选项卡。这些对象提供了访问选项对话框中的所有注册信息项。你可以通过使用在这些对象中的属性来自定义AutoCAD设置。这些对象为 , ~: p' U: |, P6 c. \! t
" U' q/ a/ e$ S N- F. H
+ h. L6 X% m$ V q$ Y3 h6 M, q, ?7 ^
* V+ c8 Y X8 IPreferencesDisplay (显示参数) : {% _* _# O7 W# t% g1 x. A; L% x
/ }5 ?( ` F4 G4 f2 O. h: a. DPreferencesDrafting (草图参数) $ C/ P7 d$ H- S9 O* S
9 N, h% S4 M9 A' x5 xPreferencesFiles (文件参数)
! a# A2 D+ [5 I! Y
7 H( Q/ x6 M# p5 }) i- dPreferencesOpenSave (打开和保存参数) ! z* A5 R! G3 {& s4 q
# O2 I' z( R6 m( W9 z+ P2 z
PreferencesOutput (输出参数)
" F5 ]- P2 ?6 l0 K7 Y9 J+ ~
3 P2 H% a6 @1 e8 [PreferencesProfile (配置参数) / a5 \+ w) W; A( J$ Y8 N
& g& Z6 m. Z6 a- T5 {) ]/ LPreferencesSelection (选择参数) 0 h6 U/ q7 ^3 P: d
3 ]" a8 p0 l1 l, ] A
PreferencesSystem (系统参数) 4 U! S" W' b7 K1 N! D6 ]8 O0 }4 u2 M
0 M% {& t {" {( }PreferencesUser (用户参数)
3 o9 c& B' T0 ^( e1 C( f( Z8 ]+ G# o; |9 L+ Z: U! n
; D; D( }. P; a" V8 e5 p3 i6 w" T! a# m/ r L8 c9 v
这些对象可通过Preferences(参数)对象来访问。至于对Preferences对象的访问可使用Application(应用程序)对象中的Preferences属性。示例如下： 7 K9 S- }, \1 P: X8 ~
; b8 R; C; C3 d% O# R. g
) j" Q, X) I, C7 v* H4 y& G+ F
访问Preferences(参数)对象 & I! L+ S! N1 m. l: D D+ V3 ^
: e' b+ V: l/ @# o3 ]- o
- ~0 g: g# B+ T3 d0 g- y4 tDim acadPref as AcadPreferences " ~* w2 O0 Y* t$ p( D
: A, W8 Q- `, n9 M6 ASet acadPref = ThisDrawing.Application.Preferences
8 d3 s5 V* O' h6 }5 g( C2 p
. U& c. m! X' t! q6 |
/ r: g& }6 p/ S3 s! `, I然后你可以使用Display、Drafting、Files、OpenSave、Output、Profile、Selection、System和User属性。例如，你可通过CursorSize属性控制十字光标的大小。
% s1 |3 y2 l) I. D" s( Z
( q/ T+ R) x$ i- s9 f% \* y. q
A/ J' J: w: j设定十字光标为全屏
0 f, I8 R1 B; t& ~* b9 S$ _: Z1 l/ K3 y1 f9 {' R
8 b) P0 q9 {0 z: y6 ~本例设定十字光标为全屏。
0 l! w# G; K+ O( g5 C# G$ t) N$ b0 ~4 |. g; |
9 t( e' J. P( Q9 N2 aacadPref.Display.CursorSize = 100 9 h& Z$ C9 L" l( j7 M; A
]* ]( t4 \+ l t) }$ a' M% b
* l. s6 o5 Q- w! B* z
你可以通过应用程序使AutoCAD界面的某些外观启用或禁用。
/ v, z$ Q+ U7 v: p0 F: v+ h/ m Z+ V, D0 F5 f5 ~! B+ G
2 S- Q: h$ G2 L0 D: ?" a/ A* @显示屏幕菜单和滚动条 7 Z. n" j' {0 a
+ d% |3 D0 U5 w/ l8 y/ w& V
本例用DisplayScreenMenu和DisplayScrollBars属性使屏幕菜单可见，使滚动条不可见。
: Z+ Z9 Y# m4 l; ]
% ]. u1 l5 t; r6 K. c% \3 g# P6 Q! |3 S3 r
acadPref.Display.DisplayScreenMenu = True * j8 _- }' q9 }! g! D! `9 K
+ W' K$ y m6 u7 W! UacadPref.Display.DisplayScrollBars = False |
|
发表于 2006-5-7 21:51