HotXLS dokumentacija

(RowIndex: TObject; This example sets the interior color for odd rows to aqua:

You can use this event to apply conditional formatting to the whole row in the detail area

(RowIndex: TObject; This example sets the interior color for odd rows to aqua:

; TForm1.DataToXLS1AfterRow(RowIndex: TObject; This example sets the interior color for odd rows to aqua: IXLSThis example sets the interior color for odd rows to aqua; RowIndex: Integer);: Integer) of object;

(RowIndex: TObject; This example sets the interior color for odd rows to aqua:

This example sets the interior color for odd rows to aqua ; TForm1.DataToXLS1AfterRow(RowIndex: TObject; This example sets the interior color for odd rows to aqua: IXLSThis example sets the interior color for odd rows to aqua; RowIndex: Integer);: Integer) of object; TObject. Nurodo the TDataToXLS component that triggered the event This example sets the interior color for odd rows to aquaThis example sets the interior color for odd rows to aqua. Atitinka a range which contains the exported row
RowIndex begin
This example sets the interior color for odd rows to aqua ; TForm1.DataToXLS1AfterRow(RowIndex: TObject; This example sets the interior color for odd rows to aqua: IXLSThis example sets the interior color for odd rows to aqua; RowIndex: Integer);: Integer) of object;
TForm1.DataToXLS1AfterRow(RowIndex: TObject; This example sets the interior color for odd rows to aqua: IXLSThis example sets the interior color for odd rows to aqua; RowIndex: Integer); begin

then

This example sets the interior color for odd rows to aqua.Interior.Color := ColorToRGB(clAqua);

procedure TForm1.DataToXLS1AfterRow(Sender: TObject;
  Range: IXLSRange; RowIndex: Integer);
begin
  if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;