Galera,

Trabalho numa empresa e temos aqui uma aplicacao que foi desenvolvida em
Delphi 7 utilizando um servidor FreeBSD com Firebird para armazenamento de
dados.

Venho observando que quando a mesma é instalada em varias maquinas
(clientes) depois de um tempo o grid (DBGrid) principal some e a aplicacao
congela, utilizando de 80 a 100% da CPU.

Nossa aplicacao possui um timer que de 30 em 30s ele verifica se chegou
novas notificacoes para o cliente logado e o controle de transacoes foi
feito via codigo do D7 da seguinte forma (para cada select, insert, delete
ou update):

try
  Transacao.TransactionID := 1;
  Transacao.IsolationLevel := xilREPEATABLEREAD;
  dados.SQLConnection1.StartTransaction(Transacao);
  dados.sqlqueryAux.Close;
  dados.sqlqueryAux.SQL.Clear;
  //CONSULTA
  dados.sqlqueryAux.Open;
  dados.SQLConnection1.Commit(Transacao);
  except
    on Exc:Exception do
      begin
        ShowMessage('Ocorreu um erro na consulta: ' + Exc.Message);
        dados.SQLConnection1.Rollback(Transacao);
      end;
  end;

Alguem poderia dar uma dica sobre o que poderia ser??

Obrigado!!!

-- 
--------------------------------------------
Paulo Laux
Sistemas de Informação (UFSC)
www.inf.ufsc.br/~laux


[As partes desta mensagem que não continham texto foram removidas]

Responder a