Source position: stdctrls.pp line 466
type TSelectionChangeEvent = procedure(
Sender: TObject;
User: Boolean
) of object;