Source position: iphtml.pas line 604
type TIpHtmlScrollEvent = procedure(
Sender: TIpHtml;
const R: TRect;
ShowAtTop: Boolean
) of object;