HotXLS ドキュメント

AfterCell イベント

現在の行の ColumnIndex で指定された列がセルに保存された後に発生します

説明

このイベントを使用して、詳細エリアのエクスポートされたセルに条件付き書式を適用できます

構文

TDBGridAfterCell = procedure (Sender: TObject; Cell: IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn) of object;
Sender TObject. 指定します TGridToXLS コンポーネント triggered イベント
Cell エクスポートされるセルを表す IXLSRange
RowIndex 現在の行のインデックス
ColumnIndex Integer. インデックス の 列
Column TColumn. オブジェクト 表します 列

使用例

この例では、奇数列の背景色をシルバーに設定します

procedure TForm1.GridToXLS1AfterCell(Sender: TObject;
  Cell: IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn);
begin
  if Odd(ColumnIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;