Nastane poté, co je nadpis sloupce určený indexem ColumnIndex uložen do
buňky
Popis
Tuto událost můžete použít k použití podmíněného formátování buňky záhlaví
Syntaxe
TDBGridAfterTitle =
procedure(Sender: TObject; Cell:
IXLSRange; ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Určuje komponentu TGridToXLS, která vyvolala událost |
| Cell |
IXLSRange představující buňku se záhlavím sloupce |
| ColumnIndex |
Integer. Index sloupce |
| Column |
TColumn. Objekt představující sloupec |
Příklad
Tento příklad nastaví šířku sloupce s indexem 3
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
if ColumnIndex = 3 then Cell.ColumnWidth := 30;
end;
Tento příklad ukazuje, jak změnit text nadpisu sloupce
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;