Отображение процесса создания отчета

отредактировано 18:31 Раздел: FastReport Studio
Добрый день!
При построении отчета используется таблица с огромным количеством записей.
Когда пользователь запускает отчет на выполнение ему приходится долго ждать когда он появится на экране.

Вопрос в следующем, возможно например, выводить окно "Подождите пожалуйста..." пока отчет формируется, как только отчет сформировался, убрать это окно и отобразить сам отчет.

Для создания отчета использую FastReport Studio 3.20

Заранее спасибо.

Комментарии

  • отредактировано 18:31
    Есть вариант сначала подготовить отчет - Report.PrepareReport(.T.), а затем показать на экран уже готовый отчет. Пока готовится можно выдать из своей программы любое сообщение.
  • отредактировано 18:31
    Спасибо за многочисленные советы ;) , сделал сам ;)
    Кому интересно:

    var f : Tform; //глобальные переменные
    l : TLabel;

    procedure Button1OnClick(Sender: TfrxComponent);
    //кнопка на форме при нажатии на которую вызывается отчет и передаются
    //параметры для его построения
    begin
    f := TForm.Create(nil);
    f.BorderStyle := bsSingle;
    f.BorderIcons := (biMinimize);
    f.Height := 160;
    f.Width := 390;
    f.Position := poDesktopCenter;
    l := TLabel.Create(f);
    l.Parent := f;
    l.Caption := 'Пожалуйста подождите...';
    l.Font.Size := 10;
    l.Width := 332;
    l.Height := 16;
    l.Alignment := taCenter;
    l.Left := 28;
    l.Top := 52;
    f.Show;
    end;

    procedure ReportOnStopReport(Sender: TfrxComponent);
    begin
    l.Free;
    f.Free;
    end;

    Жду коментарии, если будут, может что упростить можно ;)
  • отредактировано 18:31
    Не уверен, что это доступно в Студии - попробуйте TfrxReport.OldStyleProgress := True
  • отредактировано 18:31
    Почему не доступно?
    Очень даже доступно, работает как часы.

    FastReport Studio 3.20
  • отредактировано 18:31
    TfrxReport.OldStyleProgress := True

    Попробовал, что-то не работает
  • almanalman космополит
    отредактировано 18:31
    mutant78 написал:
    TfrxReport.OldStyleProgress := True

    Попробовал, что-то не работает
    Странно. Только что проверил на отчёте Master/Detail/Supbdetail из поставки Студии. Во время генерации отчёта показывается окошко в котором "бегит" индикатор сформированных страниц.

  • отредактировано 18:31
    Так я сначала и пытался использовать TfrxReport.OldStyleProgress, ну ни как не захотел работать, вот и пришлось выкручиваться.
  • almanalman космополит
    отредактировано 18:31
    mutant78 написал:
    Так я сначала и пытался использовать TfrxReport.OldStyleProgress, ну ни как не захотел работать, вот и пришлось выкручиваться.
    А какой номер используемой сборки?
    Среда разработки Delphi.NET?
  • отредактировано 18:31
    Отчет сделан в FastReport Studio, вызывается для построения через командную строку из приложения написанного на 4GL.

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.