Error al salir

[cisterpe]

Mas Datos...

Al conectar a la base de datos compruebo si existe un fichero llamado Confgen2.dbf para que elija la base de datos.

if FileExists('Confgen2.dbf') then
begin

     try
         selbas.ShowModal;
      finally
      FreeAndNil(selbas);
    end;


end
else
begin
Confgen.tablename:='confgen.dbf';
end;

Si elimino la comparacion si que funciona, pero si cambio por esto...

if FileExists('Confgen2.dbf') then
begin
Confgen.tablename:='confgen2.dbf';

end
else
begin
Confgen.tablename:='confgen.dbf';
end;

Tambien me da error.

Pense que el error podia estar en Confgen2.dbf, pero cuando me sale la pantalla para seleccionar (SelBas) si selecciono confgen.dbf tambien al salir me da error.