QuickReport.ExportToFilter выдает ошибку «переполнение стека» при использовании в TWebModule

Question

У меня есть веб-приложение, использующее компонент TWebModule. Он работает как модуль на Apache. Приведенный ниже код вызывает ошибку «Переполнение стека» в ExportToFilter. Тот же самый точный код прекрасно работает из приложения Winforms и даже службы в этом отношении. Я видел другие дискуссии по этому вопросу, которые указывают, что это как-то связано с потоками.

var
  mFileName: String;
  AExportFilter:;
begin
    mFileName := 'c:\temp\calendar.pdf';
    AExportFilter:=TQRPDFDocumentFilter.Create(mFileName);
    try

      WebSchdHistCalendarForm := TWebSchdHistCalendarForm.create(nil);
      WebSchdHistCalendarForm.quickrep1.ShowProgress := False;
      WebSchdHistCalendarForm.quickrep1.ExportToFilter(AExportFilter  );
    finally
     AExportFilter.Free;
     WebSchdHistCalendarForm.Free;
    end;

Answer 1

Если я не ошибаюсь, вы получаете переполнение стека при бесконечных рекурсивных вызовах методов. Это может быть не так, хотя здесь.