TCustomDatasetExporter

type TCustomDatasetExporter = class(TComponent)

protected

  function CreateFormatSettings; virtual;

  procedure CheckDataset();

  function BindFields; virtual;

  procedure UnbindFields;

  function CreateExportFields; virtual;

  procedure DoBeforeExecute; virtual;

  procedure DoAfterExecute; virtual;

  function DoDataRow; virtual;

  procedure DoDataHeader; virtual;

  procedure DoDataFooter; virtual;

  procedure DoDataRowStart; virtual;

  procedure ExportDataRow; virtual;

  procedure DoDataRowEnd; virtual;

  procedure DoProgress(); virtual;

  procedure ExportField(); virtual;

  function FormatField(); virtual;

  procedure ExportError();

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure BuildDefaultFieldMap(); virtual;

  function Execute; virtual;

  procedure Cancel;

  function ShowConfigDialog;

  procedure Notification(); override;

  property Canceled: Boolean; [r]

  property Dataset: TDataSet; [rw]

  property ExportFields: TExportFields; [rw]

  property FromCurrent: Boolean; [rw]

  property RestorePosition: Boolean; [rw]

  property FormatSettings: TCustomExportFormatSettings; [rw]

  property AfterExecute: TNotifyEvent; [rw]

  property BeforeExecute: TNotifyEvent; [rw]

  property OnExportRow: TOnExportRowEvent; [rw]

  property OnProgress: TExportProgressEvent; [rw]

end;

TCustomDatasetExporter

TObject