Solucionado....
en el Beforeprint puse esto
Código Delphi
[-]
if (qryBalanceIntegralGastoa01.Value = 0) and (qryBalanceIntegralGastoa02.Value = 0) and
(qryBalanceIntegralGastoa03.Value = 0) and (qryBalanceIntegralGastoa04.Value = 0) and
(qryBalanceIntegralGastoa05.Value = 0) and (qryBalanceIntegralGastoa06.Value = 0) and
(qryBalanceIntegralGastoa07.Value = 0) and (qryBalanceIntegralGastoa08.Value = 0) and
(qryBalanceIntegralGastoa09.Value = 0) and (qryBalanceIntegralGastoa10.Value = 0) and
(qryBalanceIntegralGastoa11.Value = 0) and (qryBalanceIntegralGastoa12.Value = 0) then
PrintBand := False;