
TBDEInfo Delphi Component Version 1.0. Last modifed 01/02/97.
=============================================================



Unzipping BDEINFO.ZIP should have produced the following files:

BDE.DPR      - BDEInfo Example
BDE_UNIT.DFM -       "
BDE_UNIT.PAS -       "
BDEINFO.DCR  - Resources for component palette bitmaps.
BDEINFO.DCU  - Unit file (component).
BDEINFO.TXT  - This file.


--------------------------------------------------------------------------


Installing
==========

If you need help installing the components, search the Delphi help
file for "installing libraries.
By default, the component appears on the 'BDE' tab of the component
palette.


Property
========

  property Alias_PATH               : string
  property Alias_NAME               : string
  property Alias_DRIVER             : string
  property Alias_TYPE               : string
  property Alias_UPPER              : boolean

  property Sys_VERSION              : string / SYSTEM          Version
  property Sys_LOCALSHARE           : string / SYSTEM          Local Share
  property Sys_MINBUFSIZE           : string / SYSTEM          Minbufsize
  property Sys_MAXBUFSIZE           : string / SYSTEM          Maxbufsize
  property Sys_LANGDRIVER           : string / SYSTEM          Langdriver
  property Sys_MAXFILEHANDLES       : string / SYSTEM          Maxfilehandles
  property Sys_SYSFLAGS             : string / SYSTEM          Sysflags
  property Sys_LOWMEMORY            : string / SYSTEM    Low Memory Usage Limit
  property Sys_AUTOODBC             : string / SYSTEM          Auto ODBC
  property Sys_DEFAULTDRIVER        : string / SYSTEM          Default Driver
  property DATE_SEPARATOR           : string / DATE            Separator
  property DATE_MODE                : string / DATE            Mode
  property DATE_FOURDIGITYEAR       : string / DATE            Fourdigityear
  property DATE_YEARBIASED          : string / DATE            Yearbiased
  property DATE_LEADINGZEROM        : string / DATE            Leadingzerom
  property DATE_LEADINGZEROD        : string / DATE            Leadingzerod
  property TIME_TWELVEHOUR          : string / TIME            Twelvehour
  property TIME_AMSTRING            : string / TIME            AMstring
  property TIME_PMSTRING            : string / TIME            PMString
  property TIME_SECONDS             : string / TIME            Seconds
  property TIME_MILSECONDS          : string / TIME   	       Milseconds
  property Num_DECIMALSEPARATOR     : string / NUMBER          DecimalSeparator
  property Num_THOUSANDSEPARATOR    : string / NUMBER          Thousandseparator
  property Num_DECIMALDIGITS        : string / NUMBER          Decimaldigits
  property Num_LEADINGZERON         : string / NUMBER          Leadingzeron
  property PARADOX_VERSION          : string / DRIVER PARADOX  Version
  property PARADOX_TYPE             : string / DRIVER PARADOX  Type
  property PARADOX_NETDIR           : string / DRIVER PARADOX  Net Dir
  property PARADOX_LANGDRIVER       : string / DRIVER PARADOX  LangDRIVER
  property PARADOX_LEVEL            : string / DRIVER PARADOX  Level
  property PARADOX_BLOCKSIZE        : string / DRIVER PARADOX  Block Size
  property PARADOX_FILLFACTOR       : string / DRIVER PARADOX  Fill Factor
  property PARADOX_STRICTINTEGRTY   : string / DRIVER PARADOX  Strictintegrty
  property DBase_VERSION            : string / DRIVER DBASE    Version
  property DBase_TYPE               : string / DRIVER DBASE    Type
  property DBase_LANGDRIVER         : string / DRIVER DBASE    LangDRIVER
  property DBase_LEVEL              : string / DRIVER DBASE    Level
  property DBase_MDXBLOCKSIZE       : string / DRIVER DBASE    MDX Block Size
  property DBase_MEMOFILEBLOCKSIZE  : string / DRIVER DBASE Memo File Block Size

Methods:
========

* procedure execute;
  ------------------
  To get Alias and BDE infos 


=   On BDE   Alias          : Temp
=            Path   	    : C:\
=            Default Driver : PARADOX
=            Type           : STANDART


Example 1:
----------

   BDEInfo1.Alias_Name  := 'temp';
   BDEInfo1.Alias_Upper  := true;
   BDEInfo1.execute;

   label1.caption    := BDEInfo1.Alias_Path;
   label2.caption    := BDEInfo1.Alias_Driver;
   label3.caption    := BDEInfo1.Alias_Type;

   {Result  Label1.caption = 'C:\'
            Label2.caption = 'PARADOX'
            Label3.caption = 'STANDART'}

Example 2:
----------

   BDEInfo1.Alias_Name  := 'temp';
   BDEInfo1.Alias_Upper  := false;     <--
   BDEInfo1.execute;

   label1.caption    := BDEInfo1.Alias_Path;
   label2.caption    := BDEInfo1.Alias_Driver;
   label3.caption    := BDEInfo1.Alias_Type;

   {Result  Label1.caption = 'not found'
            Label2.caption = 'not found'
            Label3.caption = 'not found'}

Example 3:
----------

   BDEInfo1.Alias_Name  := 'Temp';      <--
   BDEInfo1.Alias_Upper  := false;
   BDEInfo1.execute;

   label1.caption    := BDEInfo1.Alias_Path;
   label2.caption    := BDEInfo1.Alias_Driver;
   label3.caption    := BDEInfo1.Alias_Type;

   {Result  Label1.caption = 'C:\'
            Label2.caption = 'PARADOX'
            Label3.caption = 'STANDART'}




* function AddAlias: integer;
  ---------------------------

  Adds a BDE alias.

  For example:

   BDEinfo1.alias_name:='TESTE';
   BDEinfo1.alias_path:='C:\';
   BDEinfo1.alias_Driver:='PARADOX';   {PARADOX or DBASE or ASCII (ASCIIDRV)}

   result:=BDEinfo1.AddAlias;

   case result of
     0: messagedlg('OK'                      ,mtInformation , [mbOK], 0 );
     1: messagedlg('Driver not ASCIIDRV or DBASE or PARADOX' ,mtError,[mbOK],0 );
     2: messagedlg('DBIInit <> DBIERR_NONE'  ,mtError       , [mbOK], 0 );
     3: messagedlg('DBIERR_INVALIDPARAM'     ,mtError       , [mbOK], 0 );
     4: messagedlg('DBIERR_NAMEOTUNIQUE'     ,mtError       , [mbOK], 0 );
     5: messagedlg('DBIERR_UNKNOWNDRIVER'    ,mtError       , [mbOK], 0 );
     6: messagedlg('DBIExit <> DBIERR_NONE'  ,mtError       , [mbOK], 0 );
   end;



DBIResult return values:
------------------------

   DBIERR_INVALIDPARAM
     Null alias name, or one of the following was encountered as in
     pszDRIVERType: szASCII, szDBASE, szPARADOX. In the case of the
     latter, use a NULL pszDRIVERType to indicate a STANDARD database.

   DBIERR_NAMENOTUNIQUE
     Another alias with the same name already exists (only applicable
     when bPersistent is TRUE).

   DBIERR_UNKNOWNDRIVER
     No DRIVER name found in configuration file matching pszDRIVERType.

See Also:   DbiInit, DbiOpenCfgInfoList


Contact Information
===================

E&L Produes de Software LTDA.

E-Mail  : e&lprod@sebes.com.br
Telefax : 0055 (027) 268 1941     (BRAZIL) 

Created by:              Andr Felix Miertschink

For more information :   Andr Felix Miertschink
			 Vincius Schwambach Velten (FEIO) 

- Contact in ENGLISH oder DEUTSCH ou PORTUGUES -

Please include an e-mail address in all correspondence please,
as this is the most efficient means for responding.


**  Warranty  **
================

No warranties expressed or implied.  Use at your own risk.
