HotXLS Docs
Home Contents Overview

AfterTitle 事件

在由 ColumnIndex 指定的列标题保存到单元格之后发生

说明

您可以使用此事件对标题单元格应用条件格式

语法

TDBGridAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn) of object;
Sender TObject。指定触发该事件的 TGridToXLS 组件
Cell IXLSRange，表示带有列标题的单元格
ColumnIndex Integer。列的索引
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;