[firebase-br] Iniciar FireBird - acho meio off

[RedDevil]

ola Eduardo.
tudo bem contigo?
sincerely, espero que sim...
;o)

meus parabens...

voce ganhou de mim nao apenas no tempo de resposta como tambem na maneira de
fazer a historia...

o teu exemplo eh bem mais tecnico e bem mais tri...
;o)


[]s
força sempre.
ate +++

Luiz "RedDevil" Stefanski
=======><=========
====> Delphi 4 <=====
====> powered <=====
======> by <=======
===> IBObjects <=====
=======><=========
more in:
http://www.RedDevil.eti.br (home)
instalaçao versao -4.3.A:
http://www.firebase.com.br/cgi-bin/firebase.cgi/artigo?ID=630
exemplos e dicas :
http://www.firebase.com.br/cgi-bin/firebase.cgi/dnld?ID=165



----- Original Message -----
From: "eduardo" <eduardo em icontroller.com.br>
To: <lista em firebase.com.br>
Sent: Tuesday, April 05, 2005 1:11 AM
Subject: Re: [firebase-br] Iniciar FireBird - acho meio off


> Bem, considerando que o Server vai acabar entrando,
> vc poderia colocar o código de conexão em um laço com
> um timeout previsto.
>
> Mais ou menos assim (esquematicamente)
>
> TempoInicial := GetTickCount; //Nº de milisegundos desde que o Windows
>                     foi inicializado
> while not MyDB.Connected do
>    begin
> try
>    MyDb.Connected := True;
> except
>             //exceção muda
>          end;
> if GetTickCount-TempoInicial > 10000 then //(10 segundos)
>    break;
>    end;
>
> if not MyDB.Connected then
>     raise exception.Create('Não foi possível conectar');
>
>
> Pedro Leonardo wrote:
> > Olá lista, coloquei minha aplicação para iniciar assim que o windows for
> > carregado, portanto meu programa sempre carrega antes do FireBird, entao
> > como o banco ainda nao está rodando, meu programa apresenta aquela
mensagem
> > de erro. Algum colega já passou por essa situação? Como faço para
carregar o
> > banco 1°? Uso Delphi 7  e FB 1.5.2
> >
> > []s
> > Pedro Leonardo
> >