Source position: AbZipOut.pas line 88
type TWindowsDropEvent = procedure(
Sender: TObject;
FileName: string
) of object;