importar resultado de um DB grid para outro
02/03/2013
0
Tiago Santos
Posts
02/03/2013
Joel Rodrigues
02/03/2013
Tiago Santos
02/03/2013
Joel Rodrigues
02/03/2013
Tiago Santos
02/03/2013
Joel Rodrigues
Para comparar os campo, não bastaria fazer algo como:
if query1.FieldByName('campo').AsString = query2.FieldByName('campo').AsString then // fazer algo
?
02/03/2013
William
Por isso o Joel sugeriu atribuição via campos do DataSet!!!
02/03/2013
Tiago Santos
Bom seguindo dicas de Joel e suas em um topico anterior vai o q estou fazendo
procedure TFrmtransfere.BntTransfereClick(Sender: TObject);
begin
//
DMTransfere.ADOQuery3.Close;
DMTransfere.ADOQuery3.SQL.Clear;
DMTransfere.ADOQuery3.SQL.Add('select referencia,descricao from estoque');
if DMTransfere.ADOQuery3.FieldByName('referencia').AsString = DMTransfere.ADOQuery1.FieldByName('referencia').AsString then
DMTransfere.ADOQuery3.Open;
end;
quando clico no botao ele dar um erro
---------------------------
Transfere
---------------------------
ADOQuery3: Field 'referencia' not found.
---------------------------
OK
---------------------------
e o procedimento da ADOQUERY 1 ta funcionando corretamente, mas vou postar aqui pra poder clariar pro Joel e pra voce
DMTransfere.ADOQuery1.Close;
DMTransfere.ADOQuery1.SQL.Clear;
DMTransfere.ADOQuery1.SQL.Add('select referencia,descricao,quantidade,unitario_real,total_liq from ITENS_PED_ORCAMENTO');
DMTransfere.ADOQuery1.SQL.Add('where CODIGO = :Edt_numero');
DMTransfere.ADOQuery1.Parameters.ParamByName('Edt_numero').Value := StrToInt(Edt_numero.text);
DMTransfere.ADOQuery1.Open;
Clique aqui para fazer login e interagir na Comunidade :)