AfterTitle 事件 - HotXLS 開發者參考

在由 ColumnIndex 指定的欄標題儲存至儲存格後觸發

描述

您可以使用此事件對標題儲存格套用條件式格式設定

語法

TDBGridAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn) of object;

Sender	TObject. 指定 TGridToXLS 元件 triggered 事件
Cell	IXLSRange，代表欄標題所在的儲存格
ColumnIndex	整數. 索引的欄
Column	TColumn. 物件表示欄

範例

此範例設定索引為 3 的欄寬度

procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
  if ColumnIndex = 3 then Cell.ColumnWidth := 30;
end;

此範例示範如何變更欄標題的文字

procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
  Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;