|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载
, w) L, [9 s6 o: C7 O9 c9 N) m* e8 a Y' z0 j$ c# o
(vl-vlx-loaded-p appname)
3 d# b& c/ X& V# b7 K6 N参数
" S- l! m" y) b' b7 H+ O( q0 g" z- ~) m* c2 a8 x9 e1 k. N; f
appname
l7 C" [! J% n4 P5 F
8 ~; D. [) i) s9 d. w; M+ X字符串，指定 VLX 应用程序。
7 c/ {7 M; G9 |. A6 L3 I4 f _. @& j
/ K1 O, J7 j" N5 x4 p! x6 j* ]返回值
( l$ p8 _3 g9 K- d: \$ l" S6 }% ?& `+ o& n6 g7 ?! @' ]6 O
如果应用程序已经加载则返回 T，如果未加载则返回 nil。' Y2 u6 _) j* g( s5 O+ v
, x* ~; w, @/ |2 e示例
; \7 p# o" v8 J# t% ]- j) i {) A9 I# t, H+ Z* E
检查 vlxns 应用程序是否已加载到自己的名称空间：
; e5 E* ?( _! ?0 o# k& h
! t5 q/ z* J" t* c$ C5 |2 S命令： (vl-vlx-loaded-p "vlxns") ! I3 |# e$ Q6 o. k& T( p2 h
' r1 _" V( k0 O. H6 }
nil" r$ c$ {" @! N" M2 m+ f2 G2 r; z5 _
( U5 f# X: _4 |+ M' s$ g b应用程序未加载到自己的名称空间。
6 a; K) n0 x- u
" F) L, ?5 X( X |( e现在加载 vlxns：6 V {' d& Q- y1 J5 m4 C+ @
7 U9 m) J( R+ c1 v
命令： (load "vlxns.vlx")
9 a3 ~. i e: E: k
& f8 o% L" n1 Q7 o) v( Ynil: v7 t3 u! _1 T& X2 V8 s( J
+ Q, {& p# |( |7 w8 S检查 vlxns 应用程序是否成功加载：
7 _0 k$ d2 R$ {5 k& C9 d% q6 `8 [
命令： (vl-vlx-loaded-p "vlxns") + J- w% G! G, ^6 L& t
' k' p) v: e, o0 l; q2 UT5 Y* `- S1 H/ H5 Q" f4 c
! n# Z. P/ m3 F% Y! |$ ?& N本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
