Występuje po zapisaniu tytułu kolumny określonego przez ColumnIndex do komórki
Opis
Możesz użyć tego zdarzenia do zastosowania warunkowego formatowania do komórki nagłówka
Składnia
TDBGridAfterTitle =
procedure(Sender: TObject; Cell:
IXLSRange; ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Określa TGridToXLS komponent że triggered zdarzenie |
| Cell |
IXLSRange reprezentujący komórkę z tytułem kolumny |
| ColumnIndex |
Integer. indeks dla kolumna |
| Column |
TColumn. obiekt że reprezentuje kolumna |
Przykład
Ten przykład ustawia szerokość kolumny o indeksie 3
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
if ColumnIndex = 3 then Cell.ColumnWidth := 30;
end;
Ten przykład pokazuje jak zmienić tekst tytułu kolumny
procedure TForm1.GridToXLS1AfterTitle(Sender: TObject;
Cell: IXLSRange; ColumnIndex: Integer; Column: TColumn);
begin
Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;