F�rum Problema com dbgrid #424632

25/09/2012

amigos..vou explicar a situa��o..

tenho um form com dbgrid ok

no form tem um bot�o consultar outro para excluir e outro para ver todos os registros..

o que acontece..limpo meu banco de dados certo? apago todos os registros..fica limpo..ok

ai eu entro no meu sistema..entro no form cadastrar e cadastro 3 itens em sequencia ok

dou um executar dentro do mysql para atualizar o banco ok

ai eu fa�o um consulta, uma exclu��o consulto de novo apenas um registro selecionando na combobox o item relacionado ok

s� que se eu fa�o isso 3 ou 4 vezes o dbgrid n�o retorna mais o que t� no banco de dados..mesmo havendo dados l�

em tempo de execu��o � como eles se perdessem depois de algumas consultas ou altera��es entendem..

o curioso � que tenho outro form que faz a mesma coisa e isso n�o acontece..

tenho datasets separados query e clientedataset providername connection datasource tudo certo e ligado..

n�o entendo porque acontece isso..preciso de ajuda..� urgente amigos..meu tempo para terminar o tcc t� acabando..
grato.

Mauricio Nicoli

Curtir t�pico

+ 0

Responder

Posts

26/09/2012

Alisson Santos

O que geralmente ocorre � que em algum momento o seu dataset n�o est� sendo aberto.
tentou debugar o programa para verificar se ele executa todos os comando corretamente.

Responder

Gostei + 0

26/09/2012

Ricardo Araujo

caro amigo pode colocar alguns print e como esta a sua rotina?

Responder

Gostei + 0

26/09/2012

Mauricio Nicoli

procedure Tfrmsuporteteccons.btnpesquisarClick(Sender: TObject);
begin
 DM.ClientDataSetconstec.close;
 DM.ADOQuerySQLconstec.SQL.CLEAR;
 DM.ADOQuerySQLconstec.SQL.ADD('select codatend, filial,setor, nomepc, ip, datasup, nomefunc, descricaosup from suportetecnico where filial like :filial');
 DM.ADOQuerySQLconstec.Parameters.ParamByName('filial').Value:= comboboxpesq.text;
 DM.ClientDataSetconstec.Open;
 frmsuporteteccons.DBGrid.Refresh;
end;

usei o comando refresh da forma correta?

um amigo de outro forum disse...

as tabelas do mysql precisam que voce de um comando refresh para que elas sejam atualizadas

fiz certo?

Responder

Gostei + 0

26/09/2012

Leonardo Xavier

procedure Tfrmsuporteteccons.btnpesquisarClick(Sender: TObject);
begin
DM.ClientDataSetconstec.close;
DM.ADOQuerySQLconstec.SQL.CLEAR;
DM.ADOQuerySQLconstec.SQL.ADD('select codatend, filial,setor, nomepc, ip, datasup, nomefunc, descricaosup from suportetecnico where filial like :filial');
DM.ADOQuerySQLconstec.Parameters.ParamByName('filial').Value:= comboboxpesq.text;
DM.ClientDataSetconstec.Open;
frmsuporteteccons.DBGrid.Refresh;
end;

Eu faria da seguinte forma, n�o mudaria em nada seu c�digo apenas acrescentaria a propriedade Prepared.

procedure Tfrmsuporteteccons.btnpesquisarClick(Sender: TObject);
begin
DM.ClientDataSetconstec.close;
DM.ADOQuerySQLconstec.SQL.CLEAR;
DM.ADOQuerySQLconstec.SQL.ADD('select codatend, filial,setor, nomepc, ip, datasup, nomefunc, descricaosup from suportetecnico where filial like :filial');
DM.ADOQuerySQLconstec.Parameters.ParamByName('filial').Value:= comboboxpesq.text;
DM.ClientDataSetconstec.Prepared;
DM.ClientDataSetconstec.Open;
frmsuporteteccons.DBGrid.Refresh;
end;

Verifique se o seu datasource n�o set� se perdendo, perdendo a propriedade DAtaset ap�s muitas consultas...acontece as vezes, � s� excluir o componente e colocar outro.

Responder

Gostei + 0

27/09/2012

Alisson Santos

Fiz alguns testes aqui e conversei com outro desenvolvedor e fui informado que realmente trocando o componente resolveria, devido ele estar perdendo a referencia.
Agora existe um curso do luciano pimenta na devmedia que ensina um procedimento para isso n�o ocorrer.

Responder

Gostei + 0