Source position: shellctrls.pas line 189
type TCSLVFileAddedEvent = procedure(
Sender: TObject;
Item: TListItem
) of object;