QryArticulos.Active:=False; qryArticulos.SQL[2]:='Where codeart="'+Code.Text+'" '; QryArticulos.Active:=True;