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