Question

delphi 多个TEdit获取焦点的问题

窗体上有多个TEdit控件 但是他们的 获得焦点 和 离开焦点 的事件都相同，如果一个一个的写太麻烦 有没有什么办法可以解决

Answer 1

按住shift键全部选住，只可以直接操作获取焦点，或者离开焦点的事件

Answer 2

可以，给多个控件事件设置一个，应该会的吧？？？
按shift挨着点击控件全选中，把事件函数名在事件面板中一填就行了。

如何在这个共用事件中区分是哪个控件触发它？
if sneder = edit1 then
begin
//
end;

if sender = edit2 then
begin
//
end;

Answer 3

在一个TEdit中，写出你的事件。
然后，其它的TEdit用这个事件就行了。在Object Inspector中设置一下。

Answer 4

每个TEdit的tag分别赋不同的值
然后 case TEdit（Sender）.tag of
......
end;