Mega Code Archive

 
Categories / Delphi / ADO Database
 

How to check, if the Borland Database Engine (BDE) is installed

Title: How to check, if the Borland Database Engine (BDE) is installed uses BDE; function CheckBDEInstalled: Boolean; begin Result := (dbiInit(nil) = DBIERR_NONE) end; procedure TForm1.Button1Click(Sender: TObject); begin if CheckBDEInstalled then ShowMessage('BDE is installed.') else ShowMessage('BDE is not installed.') end;