Terjadi setelah kolom yang ditentukan oleh ColumnIndex dari baris saat ini disimpan ke dalam sel
Deskripsi
Anda dapat menggunakan event ini untuk menerapkan pemformatan bersyarat ke sel apa pun yang diekspor di area detail
Sintaks
TDBGridAfterCell =
procedure (Sender: TObject; Cell:
IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Menentukan komponen TGridToXLS yang memicu event |
| Cell |
IXLSRange. Mewakili sel yang diekspor |
| RowIndex |
Integer. Indeks baris saat ini |
| ColumnIndex |
Integer. Indeks kolom |
| Column |
TColumn. Objek yang mewakili kolom |
Contoh
Contoh ini menetapkan warna interior untuk kolom ganjil menjadi perak
procedure TForm1.GridToXLS1AfterCell(Sender: TObject;
Cell: IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn);
begin
if Odd(ColumnIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;