Código Delphi [-] with sqlcontactos do begin close; SQL.Cear; SQL.Add ('Select cel,nombre from clientes'); SQL.Add ('Where envio= True'); Open; end;
with sqlcontactos do begin close; SQL.Cear; SQL.Add ('Select cel,nombre from clientes'); SQL.Add ('Where envio= True'); Open; end;