A jelenlegi rekord FieldIndex által meghatározott mezőjének cellába mentése után következik be
Szintaxis
Ezt az eseményt feltételes formázás alkalmazásához használhatja a részlet terület bármely exportált cellájára
Leírás
TAfterCell =
procedure (Sender: TObject; Cell:
IXLSRange; RowIndex, FieldIndex: Integer; Field: TField) of object;
| Sender |
TObject. Meghatározza azt a TDataToXLS komponenst, amely kiváltotta az eseményt |
| Cell |
IXLSRange. Azt a cellát jelöli, amelyet exportál |
| RowIndex |
Integer. Az aktuális sor indexe |
| FieldIndex |
Integer. A mező indexe |
| Field |
TField. A dataset mezőjét jelölő objektum |
Példa
Ez a példa páratlan oszlopok belső színét ezüstre állítja
procedure TForm1.DataToXLS1AfterCell(Sender: TObject;
Cell: IXLSRange; RowIndex, FieldIndex: Integer; Field: TField);
begin
if Odd(FieldIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;