Source position: fpspreadsheetctrls.pas line 494
type TsColorNameEvent = procedure(
Sender: TObject;
AColor: TColor;
out AColorName: string
) of object;