把 一个控件的名称 (Name) 转换成 Text 格式，以便显示在 Edit1 里

Question

不需要什么函数，直接赋值就行了，Edit1.Text := xxx.name;

Answer 1

Edit1.Text := Form1.ClassName;

Answer 2

本身就是通过String造型而来type TComponentName: string; //系统是这样定义，所以直接赋值就可以了

Answer 3

呵呵：
下面是一个小例子，用来把所有的COMPONENTS的NAME加入MEMO 
FOR I:=0 TO tform1.componentcount-1
do
begin
 memo1.lines.add(components[i].name);
end;

Answer 4

每一个控件都从TObject类继承而来(直接继承或间接继承),在TObject中有一个
函数叫ClassName(),可以得到控件名称:--CPPAnsiString CtrlName=AnsiString(Ctrl.ClassName());--DelphiCtrlName: String;CtrlName:=Ctrl.ClassName();//这样写对不对???

Answer 5

控件的名称是*.classname 对象的名称是*.name都是string类型,
所以 edit1.text:=*.classname 
    edit1.text:=*.name
* 为对象名