Mega Code Archive

 

Categories / Delphi / Examples

 

Getting the installed ado version

With different versions of MDAC available, it is sometimes good to check whether the latest version is installed. The following function returns the version of the ADO installation: uses ComObj; function GetADOVersion: Double; var ADO: OLEVariant; begin try ADO := CreateOLEObject('adodb.connection'); Result := StrToFloat(ADO.Version); ADO := null; except Result := 0.0; end; end;