Dokumentasi HotXLS

Event AfterTitle

Terjadi setelah judul kolom yang ditentukan oleh FieldIndex disimpan ke dalam sel

Sintaks

Anda dapat menggunakan event ini untuk menerapkan pemformatan kondisional ke sel header mana pun

Keterangan

TAfterTitle = procedure(Sender: TObject; Cell: IXLSRange; FieldIndex: Integer; Field: TField) of object;
Sender TObject. Menentukan komponen TDataToXLS yang memicu event
Cell IXLSRange yang mewakili sel dengan judul kolom
FieldIndex Integer. Indeks field
Field TField. Objek yang mewakili field dataset

Contoh

Contoh ini menetapkan lebar kolom dengan indeks 2

procedure TForm1.DataToXLS1AfterTitle(Sender: TObject;
  Cell: IXLSRange; FieldIndex: Integer; Field: TField);
begin
  if FieldIndex = 2 then Cell.ColumnWidth := 30;
end;
Contoh ini menampilkan cara mengubah teks judul kolom

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