dephi中可以用控件数组吗?怎摸用?(最好举个例子)感谢您百忙之中帮我解答问题!
for i:=0 to 5 do
begin
 buttoni.caption:='hello world';//这肯定是错的,怎摸改?
end;

解决方案 »

  1.   

    for i:=0 to 5 do
    begin
     TButton(findcomponent('Button'+inttostr(i)).caption:='hello world';//
     //buttoni.caption:='hello world';//这肯定是错的,怎摸改?
    end;
      

  2.   

    在DELPHI的每一个VCL组件中都带有一个属性:COMPONENTINDEX;利用这个属性就可以实现控件数组
      

  3.   

    for i:=0 to 5 do
    begin 
     if Components[i] is TButton then
       (Components[i] as TButton).Caption:='Hello world';
    end;
      

  4.   

    修改一下,这次的已调试通过
      for i:=0 to ControlCount-1 do
         if Components[i] is TButton then
           (Components[i] as TButton).Caption:='Hello World';
      

  5.   

    同意这个:
      for i:=0 to ControlCount-1 do----------------for I:=Low(数组) to High(数组) do
         if Components[i] is TButton then
           (Components[i] as TButton).Caption:='Hello World';
      

  6.   

    刚写了一个,给你吧
      for i := 0 to FormName.ComponentCount -1 do
      begin
        if  FormName.Components[i] is TButton then
        begin
         (FormName.Components[i] as TButton).Text := '';
        end;
      end;
      

  7.   

    那如何遍及程序中的所有button呢,假如要把程序中的所有button.caption设为了234
      

  8.   

    for i:=0 to self.ComponentCount -1 do
    begin
      if self.Components[i] is TButton then
        TButton(self.Components[i]).Caption := '234'
    end;
      

  9.   

    Tbutton(findcomponent('Tbutton'+inttostr(i))).caption:=i;
      

  10.   

    可能我表达得不清,我指的是假如程序有几窗体,那如何遍到这几个窗体中的所有button呢,假如要把程序中的所有button.caption设为了234