|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载 h- \1 W- f9 I3 e
' [" D$ p. B+ z
(vl-vlx-loaded-p appname)
7 \) o' P: c, L0 Q- U参数
: C3 u. o$ ~1 V( w2 ?: Y8 D$ a; o/ `5 }8 Y1 {$ b4 D
appname* j4 v5 }% d: T t/ M( o
7 a; \" c! W! m
字符串，指定 VLX 应用程序。
g; ?" ?; C5 q
- K& e7 L5 Z4 v1 g# D' I返回值7 z7 l- t/ K1 F# e% j0 Q% Y
" A2 q$ w- U5 i$ G; Q4 `如果应用程序已经加载则返回 T，如果未加载则返回 nil。
( T6 e' i5 ]. |( ], J
; W4 [( N4 b5 a, ^示例; |3 V: E* P, ^& `% B7 ]
4 N+ n# _6 Q! u" s检查 vlxns 应用程序是否已加载到自己的名称空间：
- O5 l$ [; c% V# P, y- ~( v2 `5 q5 n, |
命令： (vl-vlx-loaded-p "vlxns")
! _- F" r* W" [, ^$ E# d9 y: v1 ^! G, ?( @
0 G/ ~/ b3 W9 l) O3 z/ b9 G# Cnil1 T, S: ^: A! O
# W q2 S4 n6 j( q+ W( y, x
应用程序未加载到自己的名称空间。7 f! Z0 E1 K, O$ ^# A4 W( _
# P+ D% ~4 U# i/ e/ T
现在加载 vlxns：1 s7 m. \ f! ? B( h
, l5 i+ g# {; Z: A3 [7 k命令： (load "vlxns.vlx")
! z2 u& I* E" j) d( Z$ j: ~
# G1 F- I5 R% h1 r9 U. ^nil7 e2 u( J- _( ?! P R6 j: i
, [- o9 J E+ T* r. Q/ Q
检查 vlxns 应用程序是否成功加载：! K$ \' A( M3 J5 ?3 j7 h
/ y3 a( e7 o; b3 ?# L
命令： (vl-vlx-loaded-p "vlxns")
' S1 [0 A, ]# v* m
8 x6 C& v$ {0 GT4 `% n5 g4 d/ _
2 e/ R V8 k7 L: L) n本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
