Cita:
Empezado por The Cid James
Lo que intento hacer es:
1-Cuando se habra en tform donde esta la consulta muestre todos los productos. (Esta parte es la que tengo problemas por no poder usar comodin con valores numericos con el igual)
2-Poder filtrar los productos por nombre o categoria (en el caso de la categoria lo tengo asociado a DBLookupCombobox)
|
Creo entender lo que quieres.
Cuando se abre el TForm el SQL debe ser el que muestra todos los productos en stock
Código SQL
[-]
SELECT
producto.id_producto, producto.Nombre, producto.Descripcion, producto.Precio_com, producto.Stock, producto.stock_minimo,
producto.precio_vent, producto.id_categoria_producto
FROM producto
WHERE
producto.estado = 1
Cuando quiera filtrar, obtienes el filtro (nombre o id) cierras el query, modificas el SQL según quieras filtrar por ID del pructo o por nombre y lo vuelves a abrir:
Código Delphi
[-]
procedure FiltrarPorNombre(Nombre : string);
begin
with QueryProductos do
begin
Close;
SQL.Clear;
SQL.Add(' SELECT ');
SQL.Add(' producto.id_producto, producto.Nombre, producto.Descripcion, producto.Precio_com, producto.Stock, producto.stock_minimo, ');
SQL.Add(' producto.precio_vent, producto.id_categoria_producto ');
SQL.Add(' FROM producto ');
SQL.Add(' WHERE ');
SQL.Add(' producto.estado = 1 ');
SQL.Add(' AND producto.Nombre like :nomp ');
Params.ByName('NOMP').AsString := '%' + Nombre + '%';
Open;
end;
end;
procedure FiltrarPorId(Id : string);
begin
with QueryProductos do
begin
[...]
SQL.Add(' AND producto.ID = :ID ');
Params.ByName('ID').AsInteger := id;
Open;
end;