Mega Code Archive
Check the bde version in your application
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.