Scalabium Software

#81:How can I check if BDE exists/installed?

you can check it in two methods:

1. read the registry key:

 RootKey := HKEY_LOCAL_MACHINE;
 OpenKey('SOFTWARE\Borland\Database Engine', False);
 try
   s := ReadString('CONFIGFILE01');

   //BDE installed
 finally
   CloseKey;
 end;

2. you can try to initialize the BDE

  IsBDEExist := Check(dbiInit(nil))

PS: I prefer the second because the some no-good un-installators may remove the BDE-file but forget to remove the key in registry:)

Copyrightc 1998-2008, Scalabium Software. All rights reserved.
webmaster@scalabium.com

May 29, 2000