现在在写一个天赋加点，怎么才能简单快捷高效的写出来呢？

Question

现在在写一个天赋加点，我的办法是点一下label控件，然后给一个变量加1,但是觉得这样太别扭了，需要我设定几十个变量，可不可以弄成一个模板，每次点一个控件都调用这个模板呢？

Answer 1

不是理解很对。
难道不能把多个IABLE看为一组，调用同一个事件，变量时一个数组，判断点击哪一个IABLE就增加数组对应的下标的值咯。

Answer 2

所有lable的click绑定到同一个click方法中，sender就是点击的lable，StrToInt(TLable(sender).Caption)+1

Answer 3

调用同一个OnClick时间。Tlable(Sender).Caption := IntToStr(StrToInt(TLable(sender).Caption)+1)