Documentație HotXLS
Acasă Cuprins Prezentare generală

Evenimentul TDataToXLSAfterTitle

Se declanșează după ce titlul coloanei specificat de FieldIndex este salvat în celulă

Descriere

type TDataToXLSAfterTitleEvent = procedure(Sender: TObject; FieldIndex: Integer; Cell: IXLSRange) of object;

Sintaxă

TAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; FieldIndex: Integer; Field: TField) of object;
Sender TObject. Specifică componenta TDataToXLS care a declanșat evenimentul
Cell IXLSRange care reprezintă celula cu titlul coloanei
FieldIndex Integer. Indexul câmpului
Field TField. Un obiect care reprezintă câmpul setului de date

Exemplu

Acest exemplu setează lățimea coloanei cu indexul 2 

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
Acest exemplu arată cum să modificați textul titlului coloanei 

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