Nastane po uložení názvu stĺpca určeného hodnotou ColumnIndex do bunky
Popis
Túto udalosť môžete použiť na použitie podmienečného formátovania pre bunku záhlavia
Syntax
TDBGridAfterTitle =
procedure(Sender: TObject; Cell:
IXLSRange; ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Určuje komponent TGridToXLS, ktorý vyvolal udalosť |
| Cell |
IXLSRange. Predstavuje bunku s názvom stĺpca |
| ColumnIndex |
Integer. Index stĺpca |
| Column |
TColumn. Objekt, ktorý predstavuje stĺpec |
Príklad
This example set the width of the column with index 3
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
if ColumnIndex = 3 then Cell.ColumnWidth := 30;
end;
Tento príklad nastaví šírku stĺpca s indexom 3
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;