Tritt auf, nachdem die durch ColumnIndex angegebene Spalte der aktuellen Zeile in die Zelle gespeichert wurde
Beschreibung
Sie können dieses Ereignis verwenden, um bedingte Formatierungen auf beliebige exportierte Zellen im Detailbereich anzuwenden
Syntax
TDBGridAfterCell =
procedure (Sender: TObject; Cell:
IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn) of object;
| Sender |
TObject. Gibt TGridToXLS Komponente dass triggered Ereignis |
| Cell |
IXLSRange. Repräsentiert die exportierte Zelle |
| RowIndex |
Integer. Der Index der aktuellen Zeile |
| ColumnIndex |
Integer. Index der Spalte |
| Column |
TColumn. Objekt dass stellt dar Spalte |
Beispiel
Dieses Beispiel setzt die Innenfarbe für ungerade Spalten auf Silber
procedure TForm1.GridToXLS1AfterCell(Sender: TObject;
Cell: IXLSRange; RowIndex, ColumnIndex: Integer; Column: TColumn);
begin
if Odd(ColumnIndex + 1) then Cell.Interior.Color := ColorToRGB(clSilver);
end;