Возникает после того, как запись, заданная RowIndex, сохранена на лист
Описание
Можно использовать данное событие для применения условного форматирования ко всей строке области данных
Синтаксис
TDBGridAfterRow =
procedure (Sender: TObject; Range:
IXLSRange; RowIndex: Integer) of object;
| Sender |
TObject. Указывает TGridToXLS компонент который triggered событие |
| Range |
IXLSRange. Представляет диапазон, содержащий экспортированную строку |
| RowIndex |
Integer. Индекс экспортируемой строки |
Пример
Данный пример задаёт голубой цвет фона для нечётных строк
procedure TForm1.GridToXLS1AfterRow(Sender: TObject;
Range: IXLSRange; RowIndex: Integer);
begin
if Odd(RowIndex) then Range.Interior.Color := ColorToRGB(clAqua);
end;