请教怎样获得form中控件的类名

请问怎样获得form中控件的类名？
我用的是delphi6.0, 我因为需要，想查一下form中每个控件的类名，根据类名去做一些处理，
但是用以下方法却得不到：
if controls[i].classname = 'edit'
或
if controls[i].classtype = edit
或
if controls[i].classparent = edit

请问高手，怎样才能做到我想要的结果？

------解决方案--------------------

Delphi(Pascal) code



  for x:=0 to self.ComponentCount-1 do
  begin
    if UpperCase(self.Controls[x].ClassName)=UpperCase('TEdit') then //注意UpperCase
    showmessage('OK');
  end;

------解决方案--------------------
edit的类名是TEdit
Delphi类名默认前缀是T

------解决方案--------------------

Delphi(Pascal) code

if SameText(Control.ClassName, 'TEdit') then //判断Control是否为TEdit类型
if Control.InheritsFrom(TEdit) then //判断Control是否为TEdit的派生类

请教怎样获得form中控件的类名

相关推荐