Question

delphi 关于edit的问题。

我放了很多的edit 从edit01，一直到edit200
我排列的方式如下：
edit01 edit02 edit03 edit04
edit05 edit06 edit07 edit08
edit09 edit10 edit11 edit12
edit13 edit14 edit15 edit16
……………………

后面以此类推，我想达到的效果是:
如果左边这一列（edit1. 5 . 9 13）中的任意一个edit显示 7
那么那个显示7的edit的颜色就变成红色。

这个问题实在困扰小弟很久。希望高手们帮一下。不胜感激！

Answer 1

太简单的没有，
但是你可以吧左面的一列的edit按住shift，一个一个选上，在onChange事件里写
if Tedit(Sender).Text='7' then
Tedit(Sender).Color :=clRed
else
Tedit(Sender).Color :=clWindow;

Answer 2

加个判断.
判断当edit[i].text ='7'的时候将edit的字体颜色改为红色!

Answer 3

yuchunkai88 回答的很好，也很简洁，顶一个啊！