Fórum Ajuda com QuickReport e Imagens dinâmicas #393005

procedure TfrmRelDemonstrativo.groupAssAfterPrint(Sender: TQRCustomBand;
  BandPrinted: Boolean);
begin
   while not dmRelatorio.qrRelDemonstrativo.Eof do
   begin
    if dmRelatorio.qrRelDemonstrativopej_responsavel.Value = 0 then
    begin
      ImageList1.GetBitmap(0,QRImageNN.Picture.Bitmap);
    end
    else
    begin
      ImageList1.GetBitmap(1,QRImageNN.Picture.Bitmap);
    end;
   dmRelatorio.qrRelDemonstrativo.Next;
 end;
end;