文章/答案/技术大牛

发布

社区首页 >问答首页 >删除首X行截断Lazarus中的TMemo

问删除首X行截断Lazarus中的TMemo
EN

Stack Overflow用户

提问于 2015-01-15 12:23:49

回答 1查看 79关注 0票数 0

我在Lazarus中使用一个TMemo来显示滚动日志，但是我想将它限制在最后500个条目上。

我想做的是(用伪代码)：

if (log_TMemo.Lines.Count > 500) then
   log_TMemo.Lines := log_TMemo[LinesCount - 500 to LinesCount];

TMemo包含TStrings TMemo.Lines，所以我想是一种复制TStrings数组子集的方法。

有没有办法做到这一点，还是有其他方法？

回答已采纳

发布于 2015-01-22 10:52:19

尽管它使用迭代，但是Lazarus论坛中的这响应工作得很好。

while log_TMemo.Lines.Count > 500 do
    log_TMemo.Lines.Delete(0);

票数 0

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/27963401

复制

相似问题

问删除首X行截断Lazarus中的TMemoEN