把Button1、Button2设为全局变量。

解决方案 »

  1.   

    我的程序中要把这些按钮都删除,请问如何操作。
    To 高手taxi(游少爷):全局变量怎么做啊?
      

  2.   

    是不是只删除动态创建的?
    可以定义一个Mylist:Tlist并在form创建时mylist:=Tlist.create;
    创建一个button则加一个到Mylist中  mylist.Add(btn);
    然后访问时如下例:
    var
    j:integer;
    btn:tbutton;
    begin
      for j:=0 to mylist.Count-1 do
      begin
       btn:=mylist.Items[j];
       btn.free;
      end;
      mylist.Clear;
    end;
      

  3.   

    for i:=self.componentcount-1 down to 0 do 
    begin
      if copy(self.components[i].name,1,6)='Button' then 
        self.components[i].free;
    end;