Настъпва след като зadadения от RowIndex запис е записан в работния лист
Описание
property AfterRow: TXLSAfterRowEvent;
Синтаксис
TAfterRow =
procedure (Sender: TObject; Range:
IXLSRange; RowIndex: Integer) of object;
| Sender |
TObject. Указва компонента TDataToXLS, който е задействал събитието |
| Range |
IXLSRange. Представлява диапазон, който съдържа експортирания ред |
| RowIndex |
Integer. Индексът на реда, който се експортира |
Пример
Този пример задава цвят аква на вътрешността за нечетни редове
procedure TForm1.DataToXLS1AfterRow(Sender: TObject;
Range: IXLSRange; RowIndex: Integer);
begin
if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;