Source position: fphttpclient.pp line 31
type TRedirectEvent = procedure(
Sender: TObject;
const ASrc: string;
var ADest: string
) of object;