|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载) G4 A4 _1 R5 t4 F |
' l. B3 P" p" [% Y1 D
(vl-vlx-loaded-p appname) # V; m/ h' d9 }! \2 z+ X5 }
参数) E9 i% ?9 H; q( _0 s) e
* @+ J3 s T$ U5 ]! ^0 e; h: Pappname
& o+ I1 J4 R7 p5 R* B7 y: n$ k5 z6 Z3 G$ `7 J; P' Y: |* ?
字符串，指定 VLX 应用程序。, v$ ^ @: O# W8 D
4 A# e, H7 t: C8 y- p, G" n" M( P& k返回值
0 `: H/ ~/ J! B- {, e
/ e! Q I9 D, b. p4 o5 v2 v1 g如果应用程序已经加载则返回 T，如果未加载则返回 nil。- H! M6 c4 Z7 [ S: o1 Q
5 N& g, O+ B+ s g$ J( S示例2 {! f8 \1 ?7 o/ z, a
2 V5 s/ _, n h! k( L4 Q, D. t检查 vlxns 应用程序是否已加载到自己的名称空间：; \+ @1 n1 p, j) t# a2 {
8 Z& ]$ w6 X% {" l8 k0 g! N7 S
命令： (vl-vlx-loaded-p "vlxns") / Y7 K7 k! `! K4 [7 m1 r$ I" y
" P, ]# u# s' ~
nil+ H0 {- d: e, H8 y" t
! F; v! o( i8 X0 V- J# i4 Y
应用程序未加载到自己的名称空间。
3 W# V& m; \4 S
1 Y* X- N; p& N( M( r5 t& E现在加载 vlxns：
- h' |1 Y& h/ f' o& r4 u+ p4 T$ {8 K: d$ l d& S
命令： (load "vlxns.vlx") ' f" j$ v0 P7 B6 y" Q: F% E
& x7 I5 C* o2 q+ g' X' q& D; K* wnil
. X6 d' w% W- Y) ^. }2 t/ Q1 }: H) z1 H& P) x( `( O2 h2 J$ a
检查 vlxns 应用程序是否成功加载：1 |7 Q" B5 b Q' }& C. t2 I- ^$ \
! \9 u+ t$ j# E! A' G% W* J
命令： (vl-vlx-loaded-p "vlxns")
, s/ L/ C X5 d1 K i! r* d- p
7 J% w- z4 H, r& M4 ?T2 J6 z2 f N& \2 n# ?# ^
7 c! k# P, m1 [: p& t
本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
