Настъпва след като заглавието на
групата, зададено от Index, е експортирано
Описание
Може да се използва за прилагане на допълнително форматиране към областта на заглавието на групата
Синтаксис
TDBGridAfterGroup =
procedure (Sender: TObject; GroupIndex: Integer; GroupRow:
IXLSRange; GroupCell:
IXLSRange) of object;
| Sender |
TObject. Указва компонента TGridToXLS, който е задействал събитието |
| GroupIndex |
Integer. Еднобазиран индекс на групата |
| GroupRow |
IXLSRange. Представлява диапазон, който съдържа цялата област на заглавието на групата |
| GroupCell |
IXLSRange. Представлява клетка, която съдържа стойността на групата |
Пример
Прилага допълнително форматиране към областта на заглавието на групата
procedure TForm1.GridToXLS1AfterGroup(Sender: TObject;
GroupIndex: Integer; GroupRow: IXLSRange; GroupCell: IXLSRange);
begin
GroupRow.Merge;
With GroupRow do begin
case GroupIndex of
1: Font.Size := 16;
2: Font.Size := 14;
else Font.Size := 12;
end;
end;
end;