HotXLS Delphi Excel Read Write Library / Component Developers Guide loslab Inc.

AfterExport event

Occurs after the dbgrid is exported into the Excel.

Description

You can use this event to apply additional formatting to the whole exported area.

Syntax

TDBGridAfterExport = procedure (Sender: TObject; Range: IXLSRange) of object;
Sender TObject. Specifies the TGridToXLS component that triggered the event.
Range IXLSRange. Represents a range which contains the whole exported area.

Example

This example puts the thick border around the exported area.

procedure TForm1.GridToXLS1AfterExport(Sender: TObject;
  Range: IXLSRange);
begin
  With Range.Borders do begin
     Item[xlEdgeBottom].LineStyle := xlContinuous;
     Item[xlEdgeBottom].Weight := xlThick;
     Item[xlEdgeTop].LineStyle := xlContinuous;
     Item[xlEdgeTop].Weight := xlThick;
     Item[xlEdgeLeft].LineStyle := xlContinuous;
     Item[xlEdgeLeft].Weight := xlThick;
     Item[xlEdgeRight].LineStyle := xlContinuous;
     Item[xlEdgeRight].Weight := xlThick;
  end;
end;
Copyright©2014 loslab.com