システムの運用中のログを表示させたい，ってのは，結構要求あるもので
今回の案件でも，やっぱり出てきました
次回，また，探し回るのが大変なんで，ここに書いておきますです
DELPHI:
- 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); //追加したばかりの行へ，メモをスクロール