HotXLS dokumentacija
Apžvalga AfterExport event TGridToXLS

is exported into the Excel

TObject. Nurodo the TDataToXLS component that triggered the event You can use this event to apply additional formatting to the whole exported area procedure

TObject. Nurodo the TDataToXLS component that triggered the event

With

IXLSWith

procedure TObject. Nurodo the TDataToXLS component that triggered the event With beginThis example puts the thick border around the exported area
procedure TForm1.DataToXLS1AfterExportWith begin);
With With.Borders

begin

end 

procedure TForm1.DataToXLS1AfterExport(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;