TSRichViewEdit.GetLastVisiblePage

Returns the index of the last page visible on the screen (at least partially), from 1

function GetLastVisiblePage: Integer;