delphi memo 自动滚动到最底下

最新推荐文章于 2022-12-30 09:55:36 发布
最新推荐文章于 2022-12-30 09:55:36 发布
阅读量9.8k 收藏 3
点赞数 1
分类专栏： delphi 文章标签： delphi buffer
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/zhangxiaonanwin/article/details/6135987
版权

memo1.Text := memo1.Text + '/n' + Buffer;
  //定位Memo到底部，显示最新输入
  SendMessage(memo1.Handle,WM_VSCROLL,SB_BOTTOM,0);

zhangxiaonanwin
关注
专栏目录
解决Memo控件选择文本时屏幕滚动
cz_012273的博客
12-08 808
一个小问题却困扰了我很长时间： Delphi FMX下用memo控件编写的文本编辑器在选择文本时，屏幕上下滚动，导致选择操作很难进行。而手机输入法自带的编辑选择功能，在自己定制的编辑器中却不起作用（输入法接口函数找不到）。尤其在修改一些源程序代码时，复制、粘贴起来简直令人恼火。 经过不断摸索，现在终于算是解决了！方法如下： 在memo的mousemove事件中，当选择文本的长度大于0小于50时，禁止滚动；当选择文本长度大于50，允许滚动，这样屏幕上滑后可继续拖动选择文本。在mouseleave事件中，当选择
Delphi7中Memo组件实现查找替换功能
06-25
Delphi7中Memo组件实现查找替换功能
Delphi: TMemo垂直滚动条自动显示
weixin_30546189的博客
08-20 929
项目中碰到此问题，之前一直没留意，研究一番用上，以做备忘。参考其它解决方法，不尽完美，自试之，达到效果。 直上代码： type TMemo = class(StdCtrls.TMemo) protected procedure Change; override; end; { TMemo } procedure TMemo.Change; va...
delphi Memo 滚动到底部/开始 [Delphi XE、Delphi 7]
weixin_30627341的博客
06-28 600
以前控制Memo滚动到底部的操作： SendMessage(memo1.Handle,WM_VSCROLL,SB_BOTTOM,0); 或者 Memo1.SelLength:=Length(Memo1.Text); //移动光标 现在不需要这样，delphi xe 10 以上版本已经非常好用了： Memo1.GoToLineEnd;　　　　//滚动当前行到光标结尾 Memo1...
Delphi 设置文本框中光标的位置在最后
xiongmao000738
09-23 1万+
设置光标的位置  edt1.SelStart := Length(edt1.Text);  edt1.SelLength := length(edt1.Text);   虚拟键盘的点击事件 //1、操作的事件 procedure TForm1.JPSR(s:Strin
memo类型控件，如何把滚动条拉倒最上面或者最下面。
云中雁012345之成长
05-09 2280
正解：   Memo1.Perform(WM_VSCROLL, SB_TOP, 0);   Memo1.Perform(EM_SETSEL, 0, 0);   Memo1.SetFocus; 其他各种消息可参考Delphi windows SDK help中的主题Edit Control Messages
文本框获取焦点后如何将光标定位到文本最后
热门推荐
u014368554的博客
02-16 1万+
用js为文本框添加内容后，为了方便操作想要把光标定位到文本最后，用了以下代码   function setCss(opt){ var sr=document.getElementById("textarea-1"); var len=sr.value.length; setSelectionRange(sr,len,len); //将光标定位到文本最后  } func
用delphi语言的memo组件获取到的文本不会自动换行
weixin_35750953的博客
12-30 1022
在 Delphi 的 Memo 组件中，如果你希望获取到的文本自动换行，你可以在 Memo 组件的属性中将 WordWrap 属性设置为 True。这样，在你调用 Memo 组件的 Text 属性获取文本内容时，文本中的每一行都会在遇到窗口边界时自动换行。 例如，你可以在你的窗体的 OnCreate 事件处理程序中将 Memo 组件的 WordWrap 属性设置为 True： procedure ...
Hex-Value-Seach.zip_delphi memo_hex delphi_memo
09-20
标题 "Hex-Value-Seach.zip_delphi memo_hex delphi_memo" 暗示这是一个关于在Delphi编程环境中实现十六进制值搜索并显示在Memo组件中的项目。这个项目可能是一个实用工具，允许用户查找内存或文件中的特定十六进制...
MyDos.rar_MYDOS_delphi memo_memo
09-19
【标题】"MyDos.rar_MYDOS_delphi memo_memo" 涉及的主要知识点是 Delphi 开发的 MYDOS 系统，它是一个模拟 Windows 命令行的程序，利用 Memo 控件来显示和编辑命令行的输出。 在 Delphi 开发环境中，MYDOS 的实现...
利用Windows消息获取Memo的行和列.rar_DELPHI 消息_delphi memo_memo
09-23
Delphi中的Memo组件实际上是基于Windows API中的`RichEdit`控件，因此，我们可以通过处理`EN_VSCROLL`和`EN_HSCROLL`消息来获取垂直和水平滚动条的变化，从而得知光标所在的行和列。具体步骤如下： 1. **创建自定义...
DELPHI的MEMO组件
wozengcong的专栏
09-14 8010
位于Standard选项卡上，它是对EDIT控件的扩展，可以对多行文本进行显示、输入 和编辑.   Lines属性：  该属性实际上为TStrings类型的对象，用来存放Memo对象的文本 TStrings有一个缺省的属性Strings， 它的定义为： property strings[index:integer]:string;  其中，Index表示字符串的索引值，
WM_VSCROLL
weixin_30627341的博客
07-29 318
关键点 控制滚动条在最下面 实现过程 SendMessage(form1.Memo1.Handle,WM_VSCROLL,SB_BOTTOM,0); 图 备注 相关链接 ...
delphi memo 行 排序
最新发布
09-10
在Delphi中，Memo组件是用于显示和编辑多行文本的一个可视组件。如果你想要对Memo组件中的文本行进行排序，你可以通过编程实现。以下是一个基本的示例，展示了如何对Memo中的文本行进行升序排序： 首先，你需要获取Memo中所有文本行，这可以通过`Memo.Lines`属性来访问。然后，你可以使用排序算法（例如快速排序或冒泡排序）来对这些行进行排序。最后，你需要将排序后的行重新赋值给`Memo.Lines`属性。 这里是一个简单的示例代码，展示了如何使用Delphi的`TStringList`和`Sort`方法来实现： ```delphi uses ..., System.Generics.Collections, System.SysUtils; procedure SortMemoLines(Memo: TMemo); var LineList: TStringList; begin // 创建一个TStringList对象，并将Memo中的每一行添加进去 LineList := TStringList.Create; try // 将Memo的每一行添加到TStringList中 LineList.AddStrings(Memo.Lines); // 对TStringList中的行进行排序 LineList.Sort; // 将排序后的行重新赋值给Memo Memo.Lines.Assign(LineList); finally // 释放TStringList对象 LineList.Free; end; end; ``` 在上面的代码中，我们创建了一个临时的`TStringList`对象，将Memo中的每一行添加进去，然后调用`Sort`方法对其进行排序。最后，我们使用`Assign`方法将排序后的行重新赋值给Memo组件。 要使用这个过程，你可以在适当的时候调用`SortMemoLines`过程，例如在用户点击一个按钮后： ```delphi procedure TForm1.ButtonSortClick(Sender: TObject); begin SortMemoLines(Memo1); end; ```
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值