AfterExport 이벤트 - HotXLS 개발자 참조

데이터 집합이 Excel로 내보내진 후에 발생합니다

설명

이 이벤트를 사용하여 내보낸 전체 영역에 추가 서식을 적용할 수 있습니다

예제

TAfterExport = procedure (Sender: TObject; Range: IXLSRange) of object;

Sender	TObject. 지정합니다 TDataToXLS 컴포넌트 triggered 이벤트
Range	전체 내보내기 영역을 포함하는 범위를 나타내는 IXLSRange

예제

This example puts the thick border around the exported area

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;