Reference TWebDownloadStartEvent

A download start event occurs before a file is downloaded. FileName is the name of the file to write and can be changed. Set Allow to False to prevent the download.

TWebDownloadStartEvent = procedure(Sender: TObject; const Uri: string; var FileName: string; var Allow: Boolean) of object;