Documentação do HotXLS

Evento AfterTitle

Ocorre depois de o título da coluna especificado por FieldIndex ser guardado na célula

Descrição

Pode utilizar este evento para aplicar formatação condicional a qualquer célula de cabeçalho

Sintaxe

TAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; FieldIndex: Integer; Field: TField) of object;
Sender TObject. Especifica o componente TDataToXLS que desencadeou o evento
Cell IXLSRange que representa a célula com o título da coluna
FieldIndex Integer. O índice do campo
Field TField. Objeto que representa o campo do conjunto de dados

Exemplo

Este exemplo mostra como alterar o texto do título da coluna

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
This example shows how to change the text of column title

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;