como comprobar que está instalado el BDE?

[lemon-club]

Saludos de nuevo!

He leido un comentario en TRUCOMANIA sobre comprobar si el BDE está instalado al ejecutar nuestro programa pero soy un mar de dudas. No sé implementarlo porque está incompleto.

La forma que explica para comprobar si está instalado el BDE es la siguiente:
_______________________________________________
1. Leyendo el registro de Windows:

RootKey := HKEY_LOCAL_MACHINE;
OpenKey('SOFTWARE\Borland\Database Engine', False);
try
s := ReadString('CONFIGFILE01');
{BDE Instalada}
{BDE Installed}
finally
CloseKey;
end;

2. Intentar incializar la BDE.

IsBDEExist := (dbiInit(nil) = 0)

NOta: Personalmente yo prefiero el segundo metodo porque el otro no es bueno ya que una desintalación podría remover los archivos de la BDE pero no registro de Windows...
__________________________________________________

¿Sabeis la forma de implementar cualquiera de estas líneas en un programa?
No me reconoce muchas de las variables como "dbiInit" y "IsDBEExist" no sé qué tipo de variable es.


En resumen,
¿¿sabeis la forma de comprobar si está instalado el BDE antes de que se lance nuestro programa??
y
¿¿sabeis la forma de instalar el bde de una forma manual sin utilizar el InstallShield??
Para esta segunda pregunta me han dicho haciendo una llamada al

gracias mil de nuevo

Jorge
Spaña