Управление форматами экспорта из кода программы

Комментарии

• Penner

  March 2019 отредактировано 19:48

  сделай свою форму Preview
• Stalker4 123

  March 2019 отредактировано 19:48

  Gdalex написал: »

  Возможно ли как-то в коде определять, для какого отчета и какие наборы экспорта будут доступны в данный момент?
  Например, для отчета №1 - только pdf, а для отчета №2 - pdf и xls.

  Штатно вроде бы нельзя, но можно компоненты экспорта кидать не на форму, а создавать динамически в зависимости от отчета.
  
• gpi

  March 2019 отредактировано 19:48

  В модуле frxDsgnIntf есть функция, frxExportFilters(), возвращающая указатель на коллекцию фильтров.
  Можно как зарегистрировать нужные фильтры, так и дерегистрировать:
  
  frxDsgnIntf.frxExportFilters.Register(frxXLSExport1); // Вызвать необязательно, если компонент создан в дизайн-тайме или конструктором .Create(...)
  
  frxDsgnIntf.frxExportFilters.UnRegister(frxXLSExport1);
  
  Учтите, что вызов UnRegister() вызывает деструктор класса компонента экспорта. Т.е, если захотите зарегистрировать фильтр экспорта повторно, создавайте его снова.
  Можно просто для конкретного пользователя создавать только те фильтры экспорта, которые ему нужны или отображать их в контекстном меню
  

  procedure TForm1.FormClick(Sender: TObject);
  begin
    frxReport1.ShowReport();
  end;
  
  procedure TForm1.frxReport1BeginDoc(Sender: TObject);
  var i: integer;
      P: TPopupMenu;
  begin
    P := TfrxPreviewForm(frxReport1.PreviewForm).ExportPopup;
    for i := 0 to frxExportFilters.Count - 1 do
      P.Items[i].Visible := frxExportFilters[i].Filter = frxXLSExport1;
  end;