Leandro H Mendes Postado Janeiro 4, 2011 Denunciar Share Postado Janeiro 4, 2011 (editado) Pessoal estou fazendo um sistema de vendas e uso tadoconectionto fazendo um select no banco e mostrando em dbedit... porem se eu tento editar ele mostra os dados do primeiro registro do selectserá que alguém pode me ajudar? with DataModule1.QTcliente do begin Close; SQL.Clear; SQL.Add('SELECT * from cliente where cnpj = '+QuotedStr(Edit1.text)); Open; DBidcliente.Text:= FieldByName('id').Text; DBEdit8.Text:= FieldByName('razao_social').Text; DBEdit9.Text:= FieldByName('nome_fantasia').Text; DBEdit10.Text:= FieldByName('inscricaoest').Text; DBEdit11.Text:= FieldByName('end').Text; DBEdit12.Text:= FieldByName('numero').Text; DBEdit13.Text:= FieldByName('complemento').Text; DBEdit14.Text:= FieldByName('cidade').Text; Editado Janeiro 5, 2011 por Leandro H Mendes Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 flavioavilela Postado Janeiro 4, 2011 Denunciar Share Postado Janeiro 4, 2011 você verificou se as ligações dos compontes (query, datasource) ou outros, estão tudo em ordem? faça alguns outros testes como: where Codigo = 5só para você ver se realmente ele não chama o registro cujo código seja 5 ou se chama... ai você já vai tirando algumas próprias conclusões... Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Leandro H Mendes Postado Janeiro 5, 2011 Autor Denunciar Share Postado Janeiro 5, 2011 (editado) ele faz o select coretamente!o problema é quando eu clico em no proscimo dbedit para editalo ele retorna ao valor do primeiro item da tabela Editado Janeiro 5, 2011 por Leandro H Mendes Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Douglas Soares Postado Janeiro 5, 2011 Denunciar Share Postado Janeiro 5, 2011 DBidcliente.Text:= FieldByName('id').Text; DBEdit8.Text:= FieldByName('razao_social').Text; DBEdit9.Text:= FieldByName('nome_fantasia').Text; DBEdit10.Text:= FieldByName('inscricaoest').Text; DBEdit11.Text:= FieldByName('end').Text; DBEdit12.Text:= FieldByName('numero').Text; DBEdit13.Text:= FieldByName('complemento').Text; DBEdit14.Text:= FieldByName('cidade').Text;Olá,O que Significa isso??? você está associando o texto do DBEdit aos campos... você tem q editar a propriedade DataSource dos DBEdits e o Field para os respectivos campos, dps disso você coloca isso no botão alterar:MeuCds.Edit; E isso no botão salvar: MeuCds.ApplyUpdates(0);Abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Leandro H Mendes
Pessoal estou fazendo um sistema de vendas e uso tadoconection
to fazendo um select no banco e mostrando em dbedit... porem se eu tento editar ele mostra os dados do primeiro registro do select
será que alguém pode me ajudar?
with DataModule1.QTcliente do
begin
Close;
SQL.Clear;
SQL.Add('SELECT * from cliente where cnpj = '+QuotedStr(Edit1.text));
Open;
DBidcliente.Text:= FieldByName('id').Text;
DBEdit8.Text:= FieldByName('razao_social').Text;
DBEdit9.Text:= FieldByName('nome_fantasia').Text;
DBEdit10.Text:= FieldByName('inscricaoest').Text;
DBEdit11.Text:= FieldByName('end').Text;
DBEdit12.Text:= FieldByName('numero').Text;
DBEdit13.Text:= FieldByName('complemento').Text;
DBEdit14.Text:= FieldByName('cidade').Text;
Editado por Leandro H MendesLink para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.