Erro ao conectar com firedac

Delphi

10/07/2013

olhem esta funcao o que tem de errado:
function TConexao.Conecta: Boolean;
begin
Desconecta;
Result:=False;
try
with DM.con2 do
begin
Params.Clear;
LoginPrompt := False;
DriverName := 'IB';
Params.Add('database='+database_server);//127.0.0.1:C:\Dados\DELTA.FDB
Params.Add('drivername=IB');
Params.Add('hostname='+host_server);//127.0.0.1
Params.Add('user_name='+user_server);//SYSDBA
Params.Add('password=masterkey');
Params.Add('port='+inttostr(porta_server));//3050
Params.Add('blobsize=-1');
Open; {Aqui aontece o erro}
Connected:=True;
{Carrega as configuracoes}
with DM.qrConf do
begin
Close;
SQL.Clear;
SQL.Add('Select * from CONFIGURACOES; ');
Open;
end;
end;
Result:=True;
except
on E:Exception do
begin
Result:=False;
ShowMessage('Não foi possivel conectar no banco de dados! Erro: '+e.Message);
_Funcoes.SaveLog('Não foi possivel conectar no banco de dados! Erro: '+e.Message);
end;
end;
end;

Componente de conexao é o firedac
quando dou um open aconteca o seguinte erro:
unsupported on-disk structurefor file "C:\Dados\DELTA.FDB";found 32779.10,suport <missing arg #4 - possibly status vector overflow>

nao consigo descobrir o que ha de errado
pois as vezes da certo conecta normalmnte
se alguem tiver uma ideia pra me ajudar
Volmir Santos

Volmir Santos

Curtidas 0
POSTAR