Builder TMemo 最初の行から表示

Builder のMemoでリストを表示すると、Memoの高さがリストの長さより短い時、リストの最後が表示されています。
これをリストの最初から表示する方法は無いでしょうか。

表示したリストの長さを覚えて置いて、その分
Memo1->Perform(EM_SCROLL, SB_LINEUP, 0);
を行えば目的は達成されるのですが、それではちょっとプログラム的に格好悪いので、何か方法をご存知の方居られましたらお教え下さい。

よろしくお願い致します。

No.1 ベストアンサー 回答者： AsanoNagi 回答日時： 2012/03/02 08:54

案１

表示内容を一度別の TStringList に移して、
Memo1->Lines->Addstrings() を使うと、表示場所が変化しない気がします。

案２
表示の先頭に戻すのでよければ、表示した後で、
Memo1->Lines->Insert(0, "");
で先頭に空行を追加して、
Memo1->Lines->Delete(0);
で、それを削除すると、いいかもしれません。

この回答へのお礼

ご回答ありがとうございます。

案1はやっては見ませんでしたが、ステップが多く成りそうなので案2を採用させて頂きます。
InsertとDeleteを
組み合わせるのは気が付きませんでした。

ありがとうございました。

お礼日時：2012/03/02 18:54