DELPHI MEMO 问题

来源：百度知道 编辑：UC知道 时间：2024/05/25 20:34:00
我用到memo控件，就是让他自己相加文字，如果多出来的话就会出现滚动条，可是问题出现了，滚动条是出来了，但是他不会自己往下动，如果不用手去拉滚动条的话，以后的文字还是看不到，能不能让滚动条自己往下动？方法越简单有效越好

文字相加？
如果使用Memo1.lines.add() 滚动条应该会自动往下滚，除非你每次都是Memo1.text:=

如果是这样的话用
procedure TForm1.Memo1Change(Sender: TObject);
begin
Memo1.Perform(WM_VSCROLL,SB_PAGEDOWN,0);
end;