请问 如何获得正在使用的控件名? 正在执行的程序的信息?

1)请问如何获得正在执行的程序的信息?
  比如想VB一样,APP.path获得正在执行的程序的路径.2)如何获得正在是用的控件的名称?
  比如 就象上面用APP一样!谢谢大家指点!!

解决方案 »

  1.   

    那正在用的控件的名字呢?比如
    procedure TForm1.Button1Click(Sender: TObject);
    var
    name:string;
    beginname:= 什么.什么   //我在这里加一句就能获得正在使用的控件的信息,比如名字end;
      

  2.   

    正在使用，其实就是获得焦点的控件，也是TWinControl的子类Form1.ActiveControl
      

  3.   

    对啊!!!谢谢老哥几个指点!
    有空帮我在看看这个帖!
    http://community.csdn.net/Expert/topic/3947/3947309.xml?temp=.6363489
    主　　题：  新手100急问! 请教_如何获取一张用image控件打开的图片的每个象素点的信息? 谢谢