Source position: colorbox.pas line 163
type TLBGetColorsEvent = procedure(
Sender: TCustomColorListBox;
Items: TStrings
) of object;