Ocorre após a coluna especificada por ColumnIndex da linha atual ser salva na célula
Descrição
Você pode usar este evento para aplicar formatação condicional a qualquer célula exportada na área de detalhe
Sintaxe
TDBGridAfterCell =
procedure (Sender: TObject; Cell:
IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Especifica TGridToXLS componente que triggered evento |
| Cell |
IXLSRange. Representa a célula exportada |
| RowIndex |
Integer. Índice da linha atual |
| ColumnIndex |
Inteiro. índice de coluna |
| Column |
TColumn. objeto que representa coluna |
Exemplo
Este exemplo define a cor de interior das colunas ímpares como prata
procedure TForm1.GridToXLS1AfterCell(Sender: TObject;
Cell: IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn);
begin
if Odd(ColumnIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;