ActiveDelphi

VDL · Enviada: Qua Abr 03, 2013 10:34 pm Assunto: Delphi x Mysql Urgente

Pessoal,
Sempre que os clientes abrem o meu sistema, dependendo do número de clientes abertos, o mysql me retorna a seguinte mensagem: "Too many connections".
Sei que quer dizer que há muitas conexões acessando a base ao mesmo tempo, por padrão, o Mysql configura o máximo de conexões para 100.
O problema que essa mensagem as vezes ocorre com até 2 clientes abertos.
Tenho acompanha atraves do adm do mysql e verifiquei que o número de conexões vai aumentando a cada consulta etc.
Já aumentei número de conexão, mas acho que isto não é correto.

O que eu posso fazer para resolver esse problema? Alguém já teve essa experiência?

Rolling Eyes

Estou usando DBX4 do D2007.

marcelo_tux · Enviada: Qui Abr 04, 2013 8:24 am Assunto: Re: Delphi x Mysql Urgente

Bom dia.

Olha nunca tive essa mensagem, tenho um sistema em delphi com mysql, onde 50 usuarios acessam o banco de dados ao mesmo tempo, e nunca recebi essa mensagem.

Descreva sua situação, como qual maquina roda seu banco, que versão do mysql voce usa, como voce faz a conexão com o banco etc.....
_________________
Porgramador Delphi - Mobile

joemil · Enviada: Qui Abr 04, 2013 8:35 am Assunto:

tb nao tenho esse problema. meu sistema abre 2 conexoes ao banco ao mesmo tempo (ZConnection (Seoz), e um SQLConnection (DBX) pra comunicacao com FastReport - ainda tiro ele - o DBX)

e sao mais de 20 usuarios ao mesmo tempo (por enqto, mais esse numero tende a crescer pra 50 mais ou menos)
_________________
SEMPRE COLOQUE [RESOLVIDO] NO SEU POST
Enviar imagens: http://tinypic.com/

CesarRocha · Enviada: Qui Abr 04, 2013 8:55 am Assunto: Re: Delphi x Mysql Urgente

joemil · Enviada: Qui Abr 04, 2013 8:59 am Assunto: Re: Delphi x Mysql Urgente

VDL · Enviada: Qui Abr 04, 2013 9:52 pm Assunto:

Pessoal, obrigado pela atenção e desculpe pela demora em responder.

Estou usando DBExpress com ClientDataSet e o servidor é Linux, para monitorar as tabelas uso Mysql Adminitrator.

E através do administrator do Mysql no Server Connections verifico que ao abrir o sistema já me aparece cerca de sete conexões, se abro um form é estabelecido mais uma ou duas conexões depende do número de tabela usada no form, porém quando fecho o mesmo, a conexão não é encerrada.

Qual pode ser o problema, se toda vez que fecho o form fecho as tabelas também, tem alguma configuração a ser feita nos componentes do Delphi ou no próprio Mysql.

joemil · Enviada: Sex Abr 05, 2013 9:02 am Assunto:

posta o codigo q vc usa pra abrir as tabelas.

pra cada form, vc ta criando um novo sqlConnection? é ele quem faz a conexao ao banco.

aqui uso so um sqlConnection (no meu caso, ZConnection) no datamodule principal, e todas as querys sao ligadas a ele
_________________
SEMPRE COLOQUE [RESOLVIDO] NO SEU POST
Enviar imagens: http://tinypic.com/

VDL · Enviada: Sex Abr 05, 2013 1:30 pm Assunto:

Joemil, obrigado pela atenção.

Uso um damodule também com um únicos SQLConnection e para acesso as tabelas os seguintes componentes : SqlDatasete, DataSetProvider, ClientDataSet e um DataSource em cada form ligado ao ClientDataSet.
No DataModule tenho as seguintes procedures e function

marcosbaixista · Enviada: Dom Abr 07, 2013 1:32 pm Assunto:

Oi amigo.

Pelo que notei, você só ta fechando os ClientDataSet, isso só tira as informações da memória, porém as tabelas estão abertas. Tenta abrir e depois fechar as conexões com as tabelas através do componente que você acessa tabela.

No caso de Query -> Query. Close
No caso de Table -> Table.Close.

Me parece que você está estabelecendo uma conexão a cada vez que acessa as tabelas.

VDL · Enviada: Seg Abr 08, 2013 3:14 pm Assunto:

Amigo,

Coloquei no Close do form o seguinte:

DM.SqlDataset.Close;

Porém continua do memso jeito.

joemil · Enviada: Seg Abr 08, 2013 3:58 pm Assunto:

procure no seu projeto por:

TSqlconnection.Create

ou se vc esta recriando o datamodule cada vez q estabelece a conexão

provavelmente vc deve ter mais de um sqlConnection, ou esta criando algum form q contenha ele

deixe somente um sqlconnection em todo projeto
_________________
SEMPRE COLOQUE [RESOLVIDO] NO SEU POST
Enviar imagens: http://tinypic.com/

VDL · Enviada: Ter Abr 09, 2013 1:09 pm Assunto:

Joemil,

Uso apenas um TSqlconnection, porém em alguns form uso esse comando para se conectar ao BD para fazer consulta:
DBCon := TDBXConnectionFactory.GetConnectionFactory.GetConnection

Isto pode ser o problema ?? Tem como encerrar a conexão após a consulta.

Estou colocando DBCon.Free e recebendo mensagem de access violation

CesarRocha · Enviada: Ter Abr 09, 2013 2:05 pm Assunto:

Fazendo dessa forma você está criando objetos de conexão toda vez. Por isso o problema, você terá que libera-la da memória.

Veja alguns exemplos...

http://marcosalles.wordpress.com/2010/03/21/executando-comando-consulta-sem-dataset-delphi2007-delphi-2010/
http://docwiki.embarcadero.com/RADStudio/XE3/en/Connecting_to_a_Database_using_the_dbExpress_Driver_Framework

Outra coisa...

Por que você precisa fazer isso? "DBCon := TDBXConnectionFactory.GetConnectionFactory.GetConnection "
Você não consegue passar o objeto de conexão, com ela criada, para esse DBCon?

~

claudiomiro · Enviada: Qui Out 27, 2016 7:12 pm Assunto:

Também estou com esse problema, alguem sabe a solução ?

leo_cj · Enviada: Sex Out 28, 2016 7:44 am Assunto: