Gestionar Base de Datos

[marcoszorrilla]

Para saber si el BDE está instalado pon BDE en el Uses de Form y con esta función que no puedo probar a fondo porque tendría que desinstalar mi propio BDE creo te podría servir.

procedure TForm1.Button1Click(Sender: TObject);
var
nBde:Integer;
begin
  Try
  nBde:= bde.DBIINTFVER;
  ShowMessage('Versión BDE '+IntToStr(bde.DBIINTFVER));
  Except
  ShowMessage('No está instalado el BDE.');
  end;

end;

En las páginas del Club tienes Caerques que es un programa con código fuente para poder hacer un mantenimiento de las tablas, reconstrucción de índices, empaquetado etc.

Un Saludo.