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