Виникає після збереження запису, вказаного RowIndex, до аркуша
Опис
Ви можете використовувати цю подію для застосування умовного форматування до цілого рядка в детальній зоні
Синтаксис
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;