Source position: ELDsgxTypes.pas line 137
type TplHTTPProgressEvent = procedure(
Sender: TObject;
UserData: Integer;
Position: Integer;
TotalSize: Integer;
Url: string;
var Continue: Boolean
) of object;