Código Delphi [-] var bandera:string; begin bandera:='True'; //declare una variable y le puse el valor True with Aclientes do begin Close; Sql.Clear; Sql.Add('select nombre,rfc from clientes where patrocinio='+bandera+' order by nombre'); Open; end;//with //en la consulta cambie " '+bandera+' " por '+bandera+'
var bandera:string; begin bandera:='True'; //declare una variable y le puse el valor True with Aclientes do begin Close; Sql.Clear; Sql.Add('select nombre,rfc from clientes where patrocinio='+bandera+' order by nombre'); Open; end;//with //en la consulta cambie " '+bandera+' " por '+bandera+'