delphi - Delphi での TMemo スクロール

Question

Memo1.Lines.Add(Text) を使用して TMemo にテキスト行を追加しています。これにより、Memo1 が一番下までスクロールします。

行を追加するときにスクロールを停止するか、終了時に強制的に一番上に戻す方法はありますか?

簡単な解決策が欲しい...

ありがとう...

Answer 1

行コレクションの開始/終了更新を使用できます。

memo.Lines.BeginUpdate;
try
  memo.Lines.Add('test');
finally
  memo.Lines.EndUpdate;
end;