HotXLS ドキュメント

AfterRow イベント

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

説明

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

構文

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

使用例

この例では、奇数行の背景色をアクアに設定します

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