Source position: colorbox.pas line 43
type TGetColorsEvent = procedure(
Sender: TCustomColorBox;
Items: TStrings
) of object;