利用delphi自带控件的优势,模拟了文本阅读器的功能,希望对您有所帮助