Código Delphi [-] query1.SQL.text:= ' Select e.Id_equipo '+ ' from equipo e, cliente c ' + ' where e.Id_cliente = c.Id_cliente '+ ' and c.Nombre like :tipo ' ; query1.Params[0].value:= '%'+edit3.text+'%'; query1.Open;
query1.SQL.text:= ' Select e.Id_equipo '+ ' from equipo e, cliente c ' + ' where e.Id_cliente = c.Id_cliente '+ ' and c.Nombre like :tipo ' ; query1.Params[0].value:= '%'+edit3.text+'%'; query1.Open;