Occurs after the specified by RowIndex record is saved into the Worksheet.
Description
You can use this event to apply conditional formatting to the whole row in the detail area.
Syntax
TAfterRow =
procedure (Sender: TObject; Range:
IXLSRange; RowIndex: Integer) of object;
| Sender |
TObject. Specifies the TDataToXLS component that triggered the event. |
| Range |
IXLSRange. Represents a range which contains the exported row . |
| RowIndex |
Integer. The index of the row which is exported. |
Example
This example sets the interior color for odd rows to aqua.
procedure TForm1.DataToXLS1AfterRow(Sender: TObject;
Range: IXLSRange; RowIndex: Integer);
begin
if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;
