Query erro ao inserir

Delphi

11/03/2013

// faz a inserção no banco de destino
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.ApplyUpdates(0);

end

erro :

[DCC Error] UTransfere.pas(86): E2003 Undeclared identifier: ''ApplyUpdates''
Tiago Santos

Tiago Santos

Curtidas 0

Respostas

Perivaldo Martins

Perivaldo Martins

11/03/2013

// faz a inserção no banco de destino
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.ApplyUpdates(0);

end

erro :

[DCC Error] UTransfere.pas(86): E2003 Undeclared identifier: ''ApplyUpdates''


Faça a substituição de ApplyUpdates por UpdateBatch
DMTransfere.ADOQuery3.Append;
DMTransfere.ADOQuery3.FieldByName(''referencia'').AsString := (''pref'');
DMTransfere.ADOQuery3.FieldByName(''descricao'').AsString := (''pdesc'');
DMTransfere.ADOQuery3.FieldByName(''quant'').AsString := (''pquant'');
DMTransfere.ADOQuery3.Post;
DMTransfere.ADOQuery3.UpdateBatch;


Boa sorte e bons códigos!
GOSTEI 0
POSTAR