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