как парсить frp файлы?

MEVMEV
отредактировано 10:53 Раздел: FastReport 2.xx VCL
Есть готовый файл frp.
делаю
frReport1.LoadPreparedReport(edInput.FileName);
frReport1.ShowPreparedReport;

но, как мне пробежаться по объектам этого отчёта и повытягивать значения?
собственно проблема.
ЗЫ заранее спасибо всем неравнодушым

Комментарии

  • отредактировано 10:53
    Приблезительно так :
    var
      Memo:TfrMemoView;
      Page:TfrPage;
      idx:Integer;
    begin  
      frReport1.LoadPreparedReport(edInput.FileName);
      
      for idx := 0  to frReport1.EMFPages.Count - 1 do
      begin
        frReport1.EMFPages.ObjectsToPage(idx);
        Page := frReport1.EMFPages[idx].Page;
        Memo := Page.FindObject('Memo1') as TfrMemoView;
        if Memo <> nil  then
          Memo.Memo.Text := '542354';
      end;
      frReport1.ShowPreparedReport();
    
  • MEVMEV
    отредактировано 10:53
    -=Den=-, большое спасибо!
    Кста, с прошедшими праздниками! ;)

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

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