怎么样判断鼠标是否点击了这个控件？

Question

我想问一下 当我点击了某一个控见比如点击了edit1.text 怎么判断是 现在的焦点在该控件上呢

Answer 1

老兄，你表述的不太清楚哦~~~你就说你要做什么好了？
比如，当光标在edit1上，我要……
写明白点么~~~目前，都不明白你要干什么

Answer 2

现在的焦点在该控件上呢
----->
OnEnter事件

Answer 3

可以只样写
procedure TFrom1.FormClick(sender:Tobject);
begin
label1.captiaon:='单击的控件为'+sender.classname;
end;
然后把控件的onclick属性设为formclick
我试了一下，只样只能报出类名，至于具体的控件名……希望有高手指点！

Answer 4

procedure TFrom1.FormClick(sender:Tobject);
begin
  Label1.Caption := '单击的控件为' + TComponent(Sender).Name;
end;