Документация на HotXLS
Начало Съдържание Общ преглед

Събитие AfterTitle

Настъпва след запис на заглавието на колоната, зadadено с FieldIndex, в клетката

Описание

property AfterTitle: TXLSAfterTitleEvent;

Синтаксис

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;