使用TTimer在文本框上添加字母

我想知道如何使用TTimer对象进行无限循环，每秒钟应在TextBox上添加字母N。但没有冻结应用程序。使用TTimer在文本框上添加字母

2010-07-30 Nathan Campos

将TTimer组件添加到窗体中，将其interval属性设置为1000（1秒）并处理OnTimer事件。到处理程序的代码把这个（假设你的文本框被命名为textBox1中）：

textBox1.Text := textBox1.Text + 'N';

来源

2010-07-30 22:43:50

这将是更有效的，无论是性能还是明智和内存明智，使用SelText属性而不是Text属性，即：' textBox1.SelStart：= textBox1.GetTextLen; textBox1.SelLength：= 0; textBox1.SelText：='N';' – 2010-07-31 00:42:26

这是值得怀疑的，因为内部它必须连接字符串。而且，优化器应该很容易理解这种情况。 – 2010-07-31 11:38:09

使用TTimer在文本框上添加字母

回答

相关问题