Código Delphi [-] ... adoQuery3.Sql.Add('where cod_cli = '+QuotedStr(ADOQuery1rif.asstring)); ...
... adoQuery3.Sql.Add('where cod_cli = '+QuotedStr(ADOQuery1rif.asstring)); ...