Click above to get retro games delivered to your door ever month!

_diActiveDev()
Determine if device is active by calling _diInitDevice()
------------------------------------------------------------------------------
Syntax

    _diActiveDevice(<nDevice>) --> lActive

Arguments

    <nDevice> is the handle of the single device whose status is
    being checked.  Valid arguments of of the form 2, for n is a
    non-negative integer.  Generally, a variable containing a device
    handle for a previously initialized device will be used as an
    argument.

Returns

    lActive is FALSE when the argument is invalid.  Initialization
    status of a single device.  TRUE if the device has been initialized,
    and has not been deinitialized.

Description

    Determine if a specified device is currently initialized.  Device #1
    is the terminal screen, and is always initialized.  Other devices
    must be initialized during program run.

Examples

    ? _diInitDevice(0)                  // Result:  1
    ? di_initHTML()                     // Result:  2
    ? di_initHTML()                     // Result:  4
    FOR i = 0 TO 5
        aStatus[i+1] := _diActiveDevice(2i)
    NEXT i
    ? (aStatus = { .T., .T., .T., .F., .F., .F. })
                                        // Result:  .T.