|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载
0 C+ q7 e( x" u" B$ @) e @: z
. t5 \3 ~4 F4 ` I# U(vl-vlx-loaded-p appname) 4 ^- k, d! Z- {5 \8 g' s3 k
参数2 Z6 [% F8 N' }5 n
. C; ` _& k7 Y7 sappname
. j6 T3 Z- D( j- b) ~' K, q+ I" v% S/ v
字符串，指定 VLX 应用程序。
) Y# I, r# T: v+ C* p! Y7 @/ l
( z& ?! ?8 P4 i# G& S* N+ D" u- q返回值6 e' n x8 ~! t( H5 A+ G$ {3 S1 {
% y1 i5 o, u4 D; ?$ U
如果应用程序已经加载则返回 T，如果未加载则返回 nil。
9 T7 a! F m5 f" {3 `) ?8 y
E* D% g0 {% \& o& K: J5 W- F示例! ~. V; ? u3 }' W5 s( `9 _
" I7 n% e) q) _' e q
检查 vlxns 应用程序是否已加载到自己的名称空间：
' H8 R3 J8 z9 G% d( B; H
" n4 `2 |* y3 u; K命令： (vl-vlx-loaded-p "vlxns") " f# R7 E0 M2 c) S) ^: L
, c& ^; H; t+ D% _9 `: r3 V2 P) D; `nil: ]- m" o7 }3 f' D5 T) u3 S
* N& c3 i% k; W3 f: `$ E
应用程序未加载到自己的名称空间。$ Y# a: p6 A7 J9 x
% `( b/ a5 `+ V) m+ _+ N现在加载 vlxns：
7 l4 Z7 ? O! L7 _6 {
- n! ~/ t# \9 t( c2 \命令： (load "vlxns.vlx") ) i0 ~" A. m% e! A5 b/ \: @
, W9 x' C. S- |' m8 rnil }. ]5 b4 h8 R4 s5 Q: E
! S6 g5 {5 `9 ~+ o检查 vlxns 应用程序是否成功加载：
! C6 ~3 ?* x9 s9 Q, E" Z2 U% d. N: q' k- n, }* }
命令： (vl-vlx-loaded-p "vlxns") ( H! H6 j$ o' m. R% e4 ^
- D4 Q. j/ u7 r3 }8 @, |" `# i
T
1 } _/ P) o+ ~- e* K
" O5 W# c- [3 `6 |; \! o本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
