控制一个窗体上的一类控件显示

//delphi中控制控件的方法
//传入参数是PANEL 或Form

procedure  TCT_WJJG. Set_Controls(obj_Component:TComponent);
var
  int_Number:integer;
begin
   for int_Number:=0 to obj_Component.ComponentCount-1 do
   begin
      if(obj_Component.Components[int_Number]  is   TDataEdit)   then
       begin
          TDataEdit(obj_Component.Components[int_Number]).Enabled:=false;
       end;
        if(obj_Component.Components[int_Number]  is   TButton)   then
       begin
          TButton(obj_Component.Components[int_Number]).Enabled:=false;
       end;
   end;
end;