如何在Delphi中实现长尾词在大型TMemo中的高效查找?