:: Erro ao Iniciar FireBird Embarcado ::
Olá pessoal,
tenho uma palicação que faz uso do FireBird embarcado. Em alguns momentos, [color=red:1c123db842]nem sempre isso acontece[/color:1c123db842] recebo uma mensagem de erro conforme pode ser vista pelo link abaixo:
http://www.digilab.com.br/Erro_01.JPG
No evento OnCreate do DataModule tenho o seguinte código:
O que pode estar provocando este erro?
No .DPR tenho o seguinte código:
[color=blue:1c123db842]Esse erro não ocorre sempre... [b:1c123db842]mas, sempre que ocorre [/b:1c123db842]é na hora em que o windows XP esta sendo iniciado. Ocorre também no win2000.[/color:1c123db842]
Uso o Firebird embarcado versão 1.5.2.4731 acessando-o via IBX 7.07 via Delphi 7.
Não tenho a mínima idéia do que possa estar causando este erro...
tenho uma palicação que faz uso do FireBird embarcado. Em alguns momentos, [color=red:1c123db842]nem sempre isso acontece[/color:1c123db842] recebo uma mensagem de erro conforme pode ser vista pelo link abaixo:
http://www.digilab.com.br/Erro_01.JPG
No evento OnCreate do DataModule tenho o seguinte código:
try if BancoDados.Connected then BancoDados.Connected := false; BancoDados.DatabaseName := ExtractFilePath(ParamStr(0))+´DB\AGENDA.FDB´; BancoDados.Connected := true; except on E: Exception do showMessage(E.Message); end; //showMessage(ExtractFilePath(ParamStr(0))+´DB\AGENDA.FDB´); //showMessage(´Erro ao acessar o banco de dados!´); //Halt(0); //end; end;
O que pode estar provocando este erro?
No .DPR tenho o seguinte código:
Application.Initialize; Application.Title := ´:: Meu Aplicativo ::´; Application.HintColor := RGB(166, 198, 200); try Application.CreateForm(TDM, DM); except uNovoUsuario.Para := false; end;
[color=blue:1c123db842]Esse erro não ocorre sempre... [b:1c123db842]mas, sempre que ocorre [/b:1c123db842]é na hora em que o windows XP esta sendo iniciado. Ocorre também no win2000.[/color:1c123db842]
Uso o Firebird embarcado versão 1.5.2.4731 acessando-o via IBX 7.07 via Delphi 7.
Não tenho a mínima idéia do que possa estar causando este erro...
Carlosib
Curtidas 0
Respostas
Kotho
16/05/2005
Cara, eu to trabalhando em uma empresa que não tem acesso livre à internet, portanto não posso ver qual o erro que está dando... mas eu utilizo o FB Embarcado em uma aplicação, e tudo funciona direitinho...
Eu apanhei um pouco no início, pois, quando ia debugar o programa, e a conexão estava aberta, dava erro, porque o Delphi já tinha a conexão (que no caso do Embarcado, não permite mais que uma).
Também dava erro, quando usava o IBExpert, e depois queria rodar o programa (ou vice-versa)...
Ou seja, sempre tem-se que tomar certos cuidados para não dar o erro.
Eu apanhei um pouco no início, pois, quando ia debugar o programa, e a conexão estava aberta, dava erro, porque o Delphi já tinha a conexão (que no caso do Embarcado, não permite mais que uma).
Também dava erro, quando usava o IBExpert, e depois queria rodar o programa (ou vice-versa)...
Ou seja, sempre tem-se que tomar certos cuidados para não dar o erro.
GOSTEI 0
Carlosib
16/05/2005
O erro quanto a mais de uma conexão aberta, posso lhe garantir que não existe.
GOSTEI 0