Bueno pues despues de intentar hacer lo que me decis sige sin funcionarme
el codigo es este
Código Delphi
[-]
procedure TAltas.PO(Sender: TObject);
begin
Con_Art_Bar.Open;
Con_Art_Bar.SQL.Clear;
Con_Art_Bar.SQL.Add('SELECT Min(Precio) AS minimo, Articulo, Nombre, ');
Con_Art_Bar.SQL.Add('Precio, Fecha, Ultimo_precio, Fecha_ultima, Cod_Art');
Con_Art_Bar.SQL.Add('FROM proveedores, articulos');
Con_Art_Bar.SQL.Add('where proveedores.Cod_Proveedor = Articulos.Cod_Proveedor');
Con_Art_Bar.SQL.Add('GROUP BY Articulo, Nombre, Precio, ');
Con_Art_Bar.SQL.Add('Fecha, Ultimo_precio, Fecha_ultima, Cod_Art');
Con_Art_Bar.SQL.Add('HAVING Articulo=Foli;');
Con_Art_Bar.Active := True;
end;
y el error es este que adjunto