Документація HotXLS
Головна Зміст Огляд

Подія AfterTitle

Виникає після збереження заголовка стовпця, вказаного FieldIndex, до комірки

Опис

Ви можете використовувати цю подію для застосування умовного форматування до будь-якої комірки заголовка

Синтаксис

TAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; FieldIndex: Integer; Field: TField) of object;
Sender TObject. Вказує на компонент TDataToXLS, який спричинив подію
Cell IXLSRange, що представляє комірку із заголовком стовпця
FieldIndex Integer. Індекс поля
Field TField. Об'єкт, що представляє поле набору даних

Приклад

Цей приклад встановлює ширину стовпця з індексом 2 

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
Цей приклад показує, як змінити текст заголовка стовпця 

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  Cell.Value := StringReplace(Cell.Value, '_', ' ', [rfReplaceAll]);
end;