对大侠来说是小问题，不过还望莫抬手Skip过去（Thanks)!

Question

点击这个控件的OnClick事件的那个下拉框，在里面选择你要触发的事件

Answer 1

我有许多控件，
一一加相同的事件处理东西，不累死就繁死。
就是我只用写一个事件处理过程可以代替一一为每个空件加OnClick处理事件。
Delphi中有，一定的！

Answer 2

将要处理的控件全选，然后在属性列表中看是否有共同OnClick事件。

Answer 3

    这个问题真的很简单，但叙述起来倒麻烦。
    OnClick无非是一个属性，就象一般的Caption之类属性一样，你可以将几个控件的OnClick赋同一个值（当然，这个值是一个过程指针）。然后，在这个过程中，做你该做的事，注意象Edit1之类的引用改为TEdit(Sender)就行了。如果需要一些不同的处理，一般用Tag属性区分。

Answer 4

就一条语句我觉得是不可能的。你看这样可以吗。
 用一循环将所有TEDIT所有控件遍历。循环所做工作如下：
 if Control is TEdit then TEdit(ActiveControl).onclick:=clickprocedure;
你认为如何

Answer 5

厉害，我怎么没想到？
不过也有另一种方法，不知道谁会？
(...as component do)
给cool_afei一半分吧，OK?