Mas Datos...
Al conectar a la base de datos compruebo si existe un fichero llamado Confgen2.dbf para que elija la base de datos.
Código:
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...
Código:
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.