Ocorre após o título de coluna especificado por FieldIndex ser salvo na célula
Descrição
Você pode usar 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 TDataToXLS componente que triggered evento |
| Cell |
IXLSRange que representa a célula com o título da coluna |
| FieldIndex |
Inteiro. índice de field |
| Field |
TField. Um objeto que representa o campo do conjunto de dados |
Exemplo
Este exemplo define a largura da coluna com índice 2
procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
Este exemplo mostra como alterar o texto do título de coluna