|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载3 \$ {' y/ O* j
E$ d0 E. b8 ] t% t
(vl-vlx-loaded-p appname) + J( y# o$ G" @3 P. f
参数
% m/ U- \" u+ t2 G3 q4 |4 U7 H2 I; m- X' M! m/ N6 h
appname% F8 c$ P% ~& c; Y. P# r
2 m& {$ I5 o- `
字符串，指定 VLX 应用程序。
. ?9 J) ~. G( @: u* u% D8 p" P
返回值' k9 `1 @. ~1 z" `
5 ]# f$ k+ Z+ |! o8 a T8 g$ A
如果应用程序已经加载则返回 T，如果未加载则返回 nil。
( W b: g2 a" Q# c# v ?' @
1 f* N: ?3 Z5 B; T' x3 ^示例
8 i+ Z8 J1 z) P/ U) ?; M, h- j6 i, Q; c3 l2 f( X9 V
检查 vlxns 应用程序是否已加载到自己的名称空间：
# M" n6 N6 \+ d$ o! i1 G: v+ [' c* u9 @% a
命令： (vl-vlx-loaded-p "vlxns") ! S4 L7 G2 R( ]( l3 v
6 R% G: c+ X2 `
nil
" o" }0 t# w2 Q6 C( p1 v5 O
0 u/ K, {, n( z7 u应用程序未加载到自己的名称空间。
7 i H7 {+ F/ Z) t& G' s e
5 P* W8 n! F/ k" H; Y; D3 w现在加载 vlxns：
+ v" F3 f" [8 A2 X) u
7 a, A+ L) s* ]/ t9 R. ~命令： (load "vlxns.vlx")
/ Q% O: f+ ?9 ^7 L0 e0 ~9 g8 i$ V: Z7 s' I
nil1 m6 E7 {( M3 }, y# m' b; ^
{! s% G1 k3 X! [4 f6 R1 j. l$ s
检查 vlxns 应用程序是否成功加载：8 }% ~- ?$ q1 E' }- [! a# K1 S
+ i7 [! [4 Q0 N: |' \$ s2 i; m! ^( [
命令： (vl-vlx-loaded-p "vlxns") g; Y1 K7 X2 e! M7 v$ {
: M6 F# p, H+ yT
7 v( y z; t/ } O4 t# ^; Q7 h' E$ @& ~# x1 P
本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
