Nastane poté, co je nadpis
skupiny určený indexem Index exportován
Popis
Tuto událost můžete použít k použití dalšího formátování oblasti nadpisu skupiny
Syntaxe
TDBGridAfterGroup =
procedure (Sender: TObject; GroupIndex: Integer; GroupRow:
IXLSRange; GroupCell:
IXLSRange) of object;
| Sender |
TObject. Určuje komponentu TGridToXLS, která vyvolala událost |
| GroupIndex |
Integer. Index skupiny s počítáním od 1 |
| GroupRow |
IXLSRange. Představuje oblast obsahující celou oblast názvu skupiny |
| GroupCell |
IXLSRange. Představuje buňku obsahující hodnotu skupiny |
Příklad
Tento příklad použije další formátování pro oblast nadpisu skupiny
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;