quarta-feira, 23 de setembro de 2015

Como usar a propriedade ConnectionState da classe TSQLConnection para obter o estado da conexão com o banco de dados

Em algumas situações nós precisamos obter o estado atual da conexão entre o componente TSQLConnection e o banco de dados. Para isso podemos usar a propriedade ConnectionState. Esta propriedade está disponível em tempo de execução e retorna um de seis valores disponíveis na enumeração TConnectionState. Veja o significado dos valores disponíveis: 

csStateClosed - A conexão está fechada. (O valor da propriedade Connected é False). 

csStateOpen - A conexão está aberta. (O valor da propriedade Connected é True). 

csStateConnecting - O componente está estabelecendo uma conexão mas não concluiu o processo. 

csStateExecuting - O componente disparou um comando SQL para o banco de dados e este está em execução. 

csStateFetching - O componente está obtendo informações a partir do banco de dados.

csStateDisconnecting - O componente está finalizando a conexão mas ainda não concluiu o processo.

Veja um trecho de código no qual verificamos se a conexão com o banco de dados está aberta:

procedure TFormPrincipal.Button1Click(Sender: TObject);
begin
  // vamos verificar se a conexão com o banco de dados está aberta
  if SQLConnection1.ConnectionState = TConnectionState.csStateOpen then
    begin
      ShowMessage('A conexão com o banco de dados está aberta.');
    end
  else
    begin
      ShowMessage('A conexão com o banco de dados está em um de seus outros estados.');
    end;
end;

Nenhum comentário:

Postar um comentário