关于动态控件内存释放问题，大家都来参与！！！

Question

procedure TForm1.Button1Click(Sender: TObject);
var
dxCheckEditself:array of TdxCheckEdit;
n,m:integer;
begin
  for n:=0 to dbgrid1.ControlCount-1 do
      dbgrid1.Controls[n].Visible:=false;
  setlength(dxCheckEditself,14);
  for m:=0 to 13 do
  begin
  if assigned(dxCheckEditself[m]) then
     freeandnil(dxCheckEditself[m]);
  dxCheckEditself[m]:=TdxCheckEdit.Create(self);
  dxCheckEditself[m].Parent:=DBGrid1;
  dxCheckEditself[m].Left:=361;
  dxCheckEditself[m].Width:=68;
  dxCheckEditself[m].Top:=16+18*m;
  dxCheckEditself[m].ReadOnly:=true;
  dxCheckEditself[m].Alignment:=taCenter;
  if m mod 2=0 then
  dbgrid1.Canvas.Brush.Color:=rgb(205,214,177);
  if m mod 2<>0 then
  dxCheckEditself[m].Color:=rgb(232,236,219);
  //dxCheckEditself[m].Style.Shadow:=true;
  dxCheckEditself[m].Visible:=true;
  end;
end;当我连续点击60次以上时，就会出现内存不足，看看是怎么回事啊！！！

Answer 1

你的数组是一个局部变量，所以会出问题。
把它改成全局的或者是Form的成员。