Source position: internetaccess.pas line 186
type TTransferReactEvent = procedure(
sender: TInternetAccess;
var transfer: TTransfer;
var reaction: TInternetAccessReaction
) of object;