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

  RDD_Count():

  Syntax:   RDD_Count()

  Returns:  Number of database drivers available to the .EXE as an integer.

  Description:  This function returns the number of database drivers (RDD's)
                that have been linked into the program.  The number may be a
                bit misleading due to the fact that the index and table
                drivers are each counted as a separate driver.  For example,
                DBFNTX and DBF are both included, since they are each a
                separate driver.

  Example:

    #include "SIXCDX.CH"        // Forces SIXCDX to be linked in

    REQUEST SIXNSX              // Forces SIXNSX to be linked in
    REQUEST SIXNTX              // Forces SIXNTX to be linked in

    LOCAL aRDDInfo, nCnt, nRDDCnt := RDD_Count()

    FOR nCnt := 1 TO nRDDCnt
      aRDDInfo := RDD_Info( RDD_Name( nCnt ))   // Fill aRDDInfo array

      ? "RDD Name.............: " + aRDDInfo[ 1 ]
      ? "Loaded?..............: " + iif( aRDDInfo[ 2 ], "Yes", "No" )
      ? "Table File Extension.: " + aRDDInfo[ 3 ]
      ? "Index File Extension.: " + aRDDInfo[ 4 ]
      ? "Secondary Index Ext..: " + aRDDInfo[ 5 ]
      ? "Memo File Extension..: " + aRDDInfo[ 6 ]
      ?
    NEXT