HotXLS ドキュメント

AfterRow イベント

RowIndex で指定されたレコードがワークシートに保存された後に発生します

説明

このイベントを使用して、詳細領域の行全体に条件付き書式を適用できます

構文

TAfterRow = procedure (Sender: TObject; Range: IXLSRange; RowIndex: Integer) of object;
Sender TObject. 指定します TDataToXLS コンポーネント triggered イベント
Range エクスポートされる行を含む範囲を表す IXLSRange
RowIndex エクスポートされる行のインデックス

使用例

この使用例は、奇数行の内側の色をアクアに設定します

procedure TForm1.DataToXLS1AfterRow(Sender: TObject;
  Range: IXLSRange; RowIndex: Integer);
begin
  if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;