Dokumentácia HotXLS
Domov Obsah Prehľad

Udalosť AfterTitle

Nastáva po uložení nadpisu stĺpca zadaného pomocou FieldIndex do bunky

Popis

Túto udalosť môžete použiť na aplikovanie podmienečného formátovania na ľubovoľnú bunku hlavičky

Syntax

TAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; FieldIndex: Integer; Field: TField) of object;
Sender TObject. Určuje komponent TDataToXLS, ktorý vyvolal udalosť
Cell IXLSRange. Predstavuje bunku s názvom stĺpca
FieldIndex Integer. Index poľa
Field TField. Objekt, ktorý predstavuje pole množiny dát

Príklad

Tento príklad nastaví šírku stĺpca s indexom 2 

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
Tento príklad ukazuje, ako zmeniť text nadpisu stĺpca 

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