delphi 中如何 让某个 Components 不显示

[yunsuifeng2009]

问题具体是这样的：
用以下方法遍历一个窗体所有控件，包括容器里面的控件，所以用ComponentCount而不能用ControlCount

Var
    i: integer;
begin
  for i:=0 to Form1.ComponentCount-1 do
  begin
    showmessage(Form1.Components[i].Name);
    //Form1.Components[i].name.Visible := false; //就是想让某个控件显示或不显示。但是这个语法用问题。
  end;

end;

所以请教各位大侠，如何实现类似 Form1.Components[i].name.Visible := false; 这样的要求啊？

拜谢。

[火龙岛主]

Var
    i: integer;
begin
  for i:=0 to Form1.ComponentCount-1 do
  begin
    if Components[i] is TWinControl then
      TWinControl(Components[i]).Visible := False;
  end;
 
end;

[yunsuifeng2009]

引用 1 楼 SmallHand 的回复:

Var
    i: integer;
begin
  for i:=0 to Form1.ComponentCount-1 do
  begin
    if Components[i] is TWinControl then
      TWinControl(Components[i]).Visible := False;
  end;
 
end;

拜谢岛主！结贴咯。嘻嘻。