Tenho um exemplo q talvez ajude:
DataModule1.ZQuery_divida.Close;
DataModule1.ZQuery_divida.SQL.Clear;
DataModule1.ZQuery_divida.SQL.Add('insert into tabdivida(IDMIL, DATA, PRODUTO,
VALOR, SIT)');
DataModule1.ZQuery_divida.SQL.Add(' VALUES(:IDMIL,:DATA,:PRODUTO,:VALOR,:SIT)');
DataModule1.ZQuery_divida.ParamByName('IDMIL').AsInteger:=StrToInt(LB_COD.Caption);
DataModule1.ZQuery_divida.ParamByName('DATA').AsDate:=StrToDate(Edit_data.Text);
DataModule1.ZQuery_divida.ParamByName('PRODUTO').AsString:=Edit_descricao.Text;
DataModule1.ZQuery_divida.ParamByName('VALOR').AsFloat:=StrToFloat(Edit_valor_cobrado.Text);
DataModule1.ZQuery_divida.ExecSQL;
DataModule1.ZQuery_divida.SQL.Clear;
DataModule1.ZQuery_divida.SQL.Add('select * from tabdivida');
DataModule1.ZQuery_divida.Open;
Mauro Paes Corrêa <[EMAIL PROTECTED]>, @hostlivre.com escreveu:
Senhores,
Tenho uma aplicação muito simples que necessita de um update de um campo (toda
a tabela).
Dentro do IBquery = update lancamentos set envioseap ='S'
Há uma transação também..mas quando eu debugo literalmente para no .execSQL
Algum colega já passou por isso?
Saudações
--
Mauro Paes Corrêa
www.gnx.com.br
__________________________________________________
Fale com seus amigos de graça com o novo Yahoo! Messenger
http://br.messenger.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
