Hi there Neven, this is the code we use for detecting versions, should be a
very similar activity for detecting if it is installed.
Also on this note, does anyone know why the ADO registry key for ADO2.5
(Win2000) comes back as 2.0000023734 or something similar? It makes this
code spack out.
{ Check for MS Active Data Objects }
if registry.OpenKeyReadOnly( 'Software\Microsoft\DataAccess' ) then
begin
try
ADOVersionStr := registry.ReadString( 'Version' );
except on e:exception do
begin
Registry.CloseKey;
Registry.Free;
raise exception.Create( 'Microsoft Data Access version 2.1 or above is
required.');
end;
end;
Registry.CloseKey;
if ADOVersionStr <= '2.1' then
raise exception.Create( 'Microsoft Data Access version ' +
ADOVersionStr + ' is installed.' + #13#10 +
'Version 2.1 or above is required.');
end
else
begin
Registry.Free;
raise exception.Create( 'Microsoft Data Access version 2.1 or above is
required.' );
end;
Registry.Free;
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
