ISLOADED |
state = ISLOADED( module AS MODULE ) AS INTEGER state = ISLOADED( library AS STRING ) AS INTEGER
Returns TRUE (1) if the module has a basic file or extension library loaded. Using the second syntax, you can check if a library has been loaded using the $LIBRARY statement.
Example:
DIM m AS MODULE
IF NOT ISLOADED( m )THEN LOAD "kalle.bas" AS m ENDIF
$LIBRARY "MyBASIC2_ExtLib"
IF ISLOADED( $LIBRARY "MyBASIC2_ExtLib" ) THEN ' Use Extension Library to make temp file name PRINT "Temporary File Name: ";PATH.GetTempFileName() ELSE ' Use Random Generator and FORMAT to generate temp file name PRINT "Temporary File Name: ";FORMAT( "MB$%08X", RND()*0x7fffffff ), ENDIF
|