如何判断手机上网页已经到底部

Posted 2023-04-15

一直往下刷呀，刷到底部的时候会显示几个个字 已经没有了 参考技术A 这种情况手机页面跟pc页面没有什么区别吧？

delphi如何判断RichEdit是不是显示到底部了？

如题，用SendMessage(RichEdit1.Handle, EM_SCROLL, SB_LINEDOWN, 0);richedit里面的文本往下滚动，当滚到底部时候showmessage一下，如何判断是否已经滚到底部了？
没有recordcount

SendMessage带有返回值，查看MSDN，关于EM_SCROLL，其返回值的低位Word是滚动的次数，如你所述，一次SendMessage，滚动一次，到底部则返回滚动0次，程序代码示例如下：
var
n : Integer;

......
n := SendMessage......
if n and $FFFF = 0 then
ShowMessage( '到底了' );
或者
if LongRec( n ).Words[0] = 0 then
ShowMessage...;
...... 参考技术A var
i :integer;
if i = richedit.RecondCount-1 then
begin
showmessage('the last one!');
end