Não imprimir quantidade = 0 em relatório?

Delphi

16/02/2004

Tenho um relatório que imprime produtos e suas respectivas quantidades em estoque, e ao solicitar o relatório as quantidades são calculadas através de uma váriavel e são apresentados no relatório, minha duvida é a seguinte:
Como faço para não imprimir o registro quando a quantidade for igual a zero, utilizando o quick report.

Obrigado.


Thiago.


Twbernardes

Twbernardes

Curtidas 0

Respostas

Lucas Silva

Lucas Silva

16/02/2004

Coloca um qlLabel (qrlQtde)...
procedure TForm1.qrlQtdePrint(sender: TObject;
  var Value: String);
begin
   if query1.FieldByName(´QUANTIDADE´).Asstring = ´0´ then 
     Value = ´´
   else 
     Value  := query1.FieldByName(´QUANTIDADE´).Asstring;
end;



GOSTEI 0
Adilsond

Adilsond

16/02/2004

No evento BeforePrint da banda voce coloca:

PrintBand := váriavelestoque <> 0;


GOSTEI 0
Twbernardes

Twbernardes

16/02/2004

ok, valeu pela dica!!!


GOSTEI 0
Wmcaetani

Wmcaetani

16/02/2004

ok, valeu pela dica!!!


:roll: Basta vc realizar um filtro na sua tabela ou uma cosulta que retorne somente o que for maior que zero.

Ex: [b:ec14542b42]Select * From Produtos where Quantidade >0[/b:ec14542b42]

Acho que é + oi - assim. 8)


GOSTEI 0
POSTAR