Reporte sin datos

[Nomad]

Hola

Que puedo hacer para que cuando un reporte no tiene datos, ni si quiera me muestre la pantalla, sino que me muestre un mensaje que diga: "El reporte no se puede generar por falta de datos" o algo así.

Yo se que podría crear un procedimiento que me revise eso, pero la pregunta es mas bien, si hay alguna forma de preguntar a Quick Reporte si el reporte viene vacio para que no lo muestre.

Slds

[[oscarac]]

podrias hacer algo como esto

Código Delphi [-]
  qryListadoComprasArticuloAnalitico.Open;  <- Data asociada al reporte
  if qryListadoComprasArticuloAnalitico.IsEmpty then
   MessageDlg('No existe informacion en el rango solicitado',mtWarning,[mbRetry],0)
  Else
  begin
    if qrListadoComprasArticuloAnalitico = Nil then
      qrListadoComprasArticuloAnalitico := TqrListadoComprasArticuloAnalitico.Create(Nil);  <- Reporte
      with qrListadoComprasArticuloAnalitico do
      begin
        qrListadoComprasArticuloAnalitico.qrlEmpresa.Caption:= dmGlobal.g_NombreEmpresa;
        qrListadoComprasArticuloAnalitico.qrlRuc.Caption:= dmGlobal.g_RUCEmpresa;
        qrListadoComprasArticuloAnalitico.qrlSubTitulo.Caption :=  'En moneda ' + iif (rgmoneda.itemindex =0, 'Nacional ','Extranjera') +  ' Del ' + DateToStr(dtInicial.Date) + ' al ' + DateToStr(dtFinal.Date);
        qrListadoComprasArticuloAnalitico.Preview;
      end;
      FreeAndNil(qrListadoComprasArticuloAnalitico);
  End;
  qryListadoComprasArticuloAnalitico.Close;

[Nomad]

Muchas gracias!

[Nomad]

Listo, ya está arreglado!