Sometimes you may want to have your application check that the proper BDE version is installed.
Use the following code, provided by Richard C Haven:
program BDEVersion;
uses
Forms,
DB,
BDE,
Dialogs,
SysUtils;
{$R *.RES}
var
ThisVersion : SYSVersion;
begin
DbiGetSysVersion(ThisVersion);
ShowMessage('BORLAND DATABASE ENGINE VERSION = ' + IntToStr(ThisVersion.iVersion));
end.