delphi7中怎么实现richedit翻页功能
展开全部
网上通常搜到的是这个：
RichEdit1.Perform(EM_SCROLLCARET, 0, 0);
哥再给你这个，万无一失
RichEdit1.SelStart := SendMessage(RichEdit1.Handle, EM_LINEINDEX, RichEdit1.Lines.Count-1, 0);
RichEdit1.Perform(EM_SCROLL, SB_BOTTOM, 0);
RichEdit1.Perform(EM_SCROLLCARET, 0, 0);
哥再给你这个，万无一失
RichEdit1.SelStart := SendMessage(RichEdit1.Handle, EM_LINEINDEX, RichEdit1.Lines.Count-1, 0);
RichEdit1.Perform(EM_SCROLL, SB_BOTTOM, 0);
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
