DelphiのTMemoスクロール

Question

私は、Memo1を下にスクロールさせるMemo1.Lines.Add（Text）を使用して、TMemoにテキストの行を追加しています。

私は行を追加するか、終了したら上に戻るように強制的にスクロールする方法はありますか？

私はあなたがラインのコレクションの開始/終了のアップデートを使用することができます...

おかげで...

Answer 1

をシンプルなソリューションをしたい：

メモの SelStartプロパティを設定し

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

Answer 2

0には、とメモにEM_SCROLLCARETメッセージを送信します。

Memo1.Lines.BeginUpdate; 
try 
    Memo1.Lines.Add(...); 
    ... 
    Memo1.SelStart := 0; 
    Memo1.SelLength := 0; 
    Memo1.Perform(EM_SCROLLCARET, 0, 0); 
finally 
    Memo1.Lines.EndUpdate; 
end;