Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá pessoal.
Estou com problemas com um delete que não deleta nada.
Estou usando delphi 6, interbase 7.5, query do BDE.
Já tentei de muitas maneiras. Minha ultima tentativa foi assim:
QProduto.Close;
Qproduto.SQL.Clear;
QProduto.SQL.add('delete from Produto');
QProduto.SQL.Add('where cod_poduto='+EdtCodProduto.Text);Não há menssagem de erro. A caixa de menssagem diz que o registro
foi excluído com sucesso. Mas não foi.
Se alguém puder me ajudar agradeço muito.
Pelo fonte que colocou, esta faltando o fundamental, que é mandar o comando para executar o SQL:
QProduto.Close;
Qproduto.SQL.Clear;
QProduto.SQL.add('delete from Produto');
QProduto.SQL.Add('where cod_poduto='+EdtCodProduto.Text);
QProduto.ExecSQL;>
Pelo fonte que colocou, esta faltando o fundamental, que é mandar o comando para executar o SQL:
QProduto.Close;
Qproduto.SQL.Clear;
QProduto.SQL.add('delete from Produto');
QProduto.SQL.Add('where cod_poduto='+EdtCodProduto.Text);
QProduto.ExecSQL;ByOracle e Marcio,
Muito obrigado pela ajuda de vocês. O problema era o que vocês disseram mesmo.
Tá resolvido. http://forum.imasters.com.br/public/style_emoticons/default/clap.gif
Faltou o
QProduto.ExecSQL;
Acho que é isso.