Occurs after the specified by RowIndex record is saved into the Worksheet
Beskrivning
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. Anger the TDataToXLS component that triggered the event |
| Range |
IXLSRange. Representerar a range which contains the exported row |
| RowIndex |
Integer. The index of the row which is exported |
Exempel
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;