https://blog.dummzeuch.de/2016/01/16/automatically-scroll-a-memo-line-by-line-in-delphi/