Se produce después de exportar el título del
grupo especificado por Index
Descripción
Puede usar este evento para aplicar formato adicional al área de título del grupo
Sintaxis
TDBGridAfterGroup =
procedure (Sender: TObject; GroupIndex: Integer; GroupRow:
IXLSRange; GroupCell:
IXLSRange) of object;
| Sender |
TObject. Especifica TGridToXLS componente que triggered evento |
| GroupIndex |
Integer. Índice basado en 1 del grupo |
| GroupRow |
IXLSRange. Representa un rango que contiene el área completa del título de grupo |
| GroupCell |
IXLSRange. Representa una celda que contiene el valor del grupo |
Ejemplo
Este ejemplo aplica formato adicional al área de título del grupo
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;