پس از اینکه فیلد مشخصشده توسط FieldIndex از رکورد جاری در سلول ذخیره میشود رخ میدهد
توضیحات
میتوانید از این رویداد برای اعمال قالببندی شرطی به هر سلول صادرشده در ناحیه جزئیات استفاده کنید
نحو
TAfterCell =
procedure (Sender: TObject; Cell:
IXLSRange; RowIndex, FieldIndex: Integer; Field: TField) of object;
| Sender |
TObject. مؤلفه TDataToXLS را که این رویداد را فعال کرده است مشخص میکند |
| Cell |
IXLSRange. سلولی را نشان میدهد که صادر میشود |
| RowIndex |
Integer. شاخص ردیف جاری |
| FieldIndex |
Integer. شاخص فیلد |
| Field |
TField. شیئی که فیلد مجموعهداده را نشان میدهد |
مثال
این مثال رنگ داخل ستونهای فرد را به نقرهای تنظیم میکند
procedure TForm1.DataToXLS1AfterCell(Sender: TObject;
Cell: IXLSRange; RowIndex, FieldIndex: Integer; Field: TField);
begin
if Odd(FieldIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;