Ocorre após o registo especificado por RowIndex ser guardado na Folha de Cálculo
Descrição
Pode utilizar este evento para aplicar formatação condicional a toda a linha na área de detalhe
Sintaxe
TDBGridAfterRow =
procedure (Sender: TObject; Range:
IXLSRange; RowIndex: Integer) of object;
| Sender |
TObject. Especifica o componente TGridToXLS que desencadeou o evento |
| Range |
IXLSRange. Representa um intervalo que contém toda a linha exportada |
| RowIndex |
Integer. O índice da linha exportada |
Exemplo
Este exemplo define a cor interior das linhas ímpares como água-marinha
procedure TForm1.GridToXLS1AfterRow(Sender: TObject;
Range: IXLSRange; RowIndex: Integer);
begin
if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;