如何停止自动滚动备忘录控件？

Question

在Windows 7中,备忘录控件(TMemo)将在文本被插入(Memo.Lines.Add(Path);)之后自动滚动,这是我不想要的,因为滚动是由我自己完成的.

如何停止自动滚动？

Answer 1

通常,将文本添加到备忘录控件会将备忘录滚动到插入文本的底部.为防止这种情况,请Lines.BeginUpdate在添加文本之前调用,然后再调用EndUpdate:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Lines.BeginUpdate;
  try
    Memo1.Lines.Add('...');
    Memo1.Lines.Add('...');
    ...
  finally
    Memo1.Lines.EndUpdate;
  end;
end;