Consulta não funciona
if edit1.Text <> ´´ then
begin
DataModulederma.ZQueryPadrao.SQL.Clear;
DataModulederma.ZQueryPadrao.SQL.Add(´select * from padrao where codigo starting:cod order by codigo´);
DataModulederma.ZQueryPadrao.ParamByName(´cod´).AsInteger:=strtoint(edit1.Text);
DataModulederma.ZQueryPadrao.Filtered:=true;
DataModulederma.ZQueryPadrao.Open;
end;
estou usando assim no evento onchange, fui fazer um teste com dois usuarios, gravei um produto e depois fui na tela de consulta na minha maquina, aparece mas na outra maquina ele não aparece, o outro usuario tem que sair totalmente do sistema e quando entra novamente o produto aparece na consulta, estou usando o componente Zeos, todas as minhas telas de consulta esta assim.
begin
DataModulederma.ZQueryPadrao.SQL.Clear;
DataModulederma.ZQueryPadrao.SQL.Add(´select * from padrao where codigo starting:cod order by codigo´);
DataModulederma.ZQueryPadrao.ParamByName(´cod´).AsInteger:=strtoint(edit1.Text);
DataModulederma.ZQueryPadrao.Filtered:=true;
DataModulederma.ZQueryPadrao.Open;
end;
estou usando assim no evento onchange, fui fazer um teste com dois usuarios, gravei um produto e depois fui na tela de consulta na minha maquina, aparece mas na outra maquina ele não aparece, o outro usuario tem que sair totalmente do sistema e quando entra novamente o produto aparece na consulta, estou usando o componente Zeos, todas as minhas telas de consulta esta assim.
Rjcerri
Curtidas 0
Respostas
Emerson Nascimento
28/03/2005
após gravar é necessário executar um commit para efetivar a gravação dos dados.
GOSTEI 0
Rjcerri
28/03/2005
mas tem, na tela de cadastro tem um commit la, o problema esta em rede, quando eu cadastro um produto o outro usuario nao consegue ver ele na tela de consulta, mas eu vejo na minha maquina, o outro usuario só consegue ver quando sai do sistema e entra denovo.
GOSTEI 0
Gandalf.nho
28/03/2005
Setou as transações como ReadCommited?
GOSTEI 0
Rjcerri
28/03/2005
não tinha feito isso, muito obrigado agora funcionou!!!! :D
GOSTEI 0