Редактирование диалога сохранения в QuickReport для отображения опций расширения файлов

Delphi , Компоненты и Классы , TQuickReport

При работе с QuickReport, при нажатии кнопки "Сохранить" появляется диалог с различными опциями расширения файлов, такими как QuickReport file(.qrp) и Excel spreadsheet (.xls). Однако, иногда может потребоваться отобразить в диалоге только определенные опции расширения файлов. В данной статье мы рассмотрим, как отредактировать диалог сохранения в QuickReport для отображения только опций расширения файлов QuickReport.

Проблема

При использовании QuickReport версии 4.06 при нажатии кнопки "Сохранить" в диалоге сохранения отображаются различные опции расширения файлов, в том числе QuickReport file(.qrp) и Excel spreadsheet (.xls). Однако, пользователю необходимо отобразить в диалоге только опцию расширения файла QuickReport.

Решение

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

Альтернативный ответ

Если в коде QuickReport отсутствуют компоненты, отвечающие за отображение опций расширения файлов, которые не нужны пользователю, можно удалить или закомментировать сам QRExport unit в коде проекта. Это приведет к тому, что в диалоге сохранения будут отображаться только опции расширения файлов QuickReport.

Пример кода на Object Pascal (Delphi)

unit QRExport;

interface

type
  TQRExportFilter = class
  private
    FName: string;
    FExtension: string;
    FDescription: string;
    FFilterType: TQRFilterType;
  public
    property Name: string read FName write FName;
    property Extension: string read FExtension write FExtension;
    property Description: string read FDescription write FDescription;
    property FilterType: TQRFilterType read FFilterType write FFilterType;
    constructor Create(AName, AExtension, ADescription, AFilterType: TQRFilterType);
    destructor Destroy; override;
  end;

type
  TQRFilterType = (ftQuickReport, ftExcel, ftHTML, ftAscii, ftCommaSeparated, ftRTF, ftWMF);

var
  QRXLSFilter: TQRExportFilter;
  QRExcelFilter: TQRExportFilter;
  QRHTMLDocumentFilter: TQRExportFilter;
  QRA

Создано по материалам из источника по ссылке.

Редактирование диалога сохранения в QuickReport для отображения только опций расширения файлов QuickReport.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: TQuickReport ::