TMemo使って，システム稼動ログを見るやりかたとか？

システムの運用中のログを表示させたい，ってのは，結構要求あるもので

今回の案件でも，やっぱり出てきました

次回，また，探し回るのが大変なんで，ここに書いておきますです

    memLog.Lines.Add(st);          //１行追加
    if memLog.Lines.Count > 300 then       //３００行超えたら，超えた分，先頭の行を削除
    begin
        while(memLog.Lines.Count > 300) do
        begin
            memLog.Lines.Delete(0);
        end;
    end;

    memLog.SelStart := Length(memLog.Lines.Text);     
    memLog.Perform(EM_SCROLLCARET, 0, 0);            //追加したばかりの行へ，メモをスクロール