Как создать список фильтров экспорта

Комментарии

• Lex

  May 2006 отредактировано 07:30

  procedure TForm1.Button1Click(Sender: TObject);
  var
    i: Integer;
  begin
    Memo1.Clear;
    for i := 0 to Self.ComponentCount - 1 do
      if Self.Components[i] is TfrxCustomExportFilter then
        Memo1.Lines.Add(Self.Components[i].Name);
  end;
  

  
  при условии что сам отчет и компоненты экспорта лежат на Form1
• Alexug

  May 2006 отредактировано 07:30

  Не совсем подходит.
  При таком способе в список вставляется компонент frxDotMatrixExport. Хотелось, чтобы список получался таким-же, как при просмотре отчета - выбор экспорта.
  У класса TfrxCustomExportFilter есть свойство FilterDesc - название типа файла с расширением.
  Это свойство одинаковое у frxXLSExport и frxXMLExport: 'Файл Excel (*.xls)|*.xls'). А у frxMailExport и frxTXTExport это свойство вообще пустое.