Source position: forms.pp line 376
type TDropFilesEvent = procedure(
Sender: TObject;
const FileNames: array of String
) of object;