当前窗口的焦点控件为:self.ActiveControl;
其它窗口则要先取得窗体变量,
然后用变量.ActiveControl;

解决方案 »

  1.   

    我的意思是说如何返回得到焦点的控件,控件是我运行后建的。 只能在程序中得到NAME值
      

  2.   

    同意 liang_z(千山一刀之忍者神龟)的观点
      

  3.   

    请问具体如何实现?DELPHI 的帮助写得都不算详细! 
      

  4.   

    form1.caption:=activecontrol.name;
    窗体标题就可以显示聚焦控件的name名
      

  5.   

    写一个ButtonEnter处理事件,Form上的所有控件公用此事件。
    procedure TForm1.ButtonEnter(Sender: TObject);
    var
       i:integer;
    begin
       for i:=0 to self.ControlCount -1 do
          if controls[i]=sender then
          begin
             form1.Caption:=controls[i].Name;//演示用例
             //处理代码
             //……
             //……     
          end;
    end;
      

  6.   

    caoyq(草民呆瓜)兄: 你所写的事件系统并不识别啊 只有在前面定义完了才行啊 是不是我有什么不明白的地方啊?