一个非常简单的问题?送分?在线等待??????

我动态生成的控件 删除的时候怎么删不对头,
  帮我看看?
  如果觉得分数少了可以在加?
var
  Form1: TForm1;
  LabelArr   :Array[1..100] of TLabel;
  mylist:tlist;
  i:integer;
//动态创建
LabelArr[i]:=tlabel.Create(nil);
 LabelArr[i].Parent :=form1;
 LabelArr[i].Left :=x;
 LabelArr[i].Top :=y;
 LabelArr[i].Caption :='dsfdsf';
 LabelArr[i].Tag :=i;
 mylist.Add(LabelArr[i]);
 LabelArr[i].PopupMenu :=form1.PopupMenu1 ;
//删除出了问题???
if mylist <>nil then
     begin
        if mylist.Count >0 then
           begin
             tt[j].Caption :=:=mylist.items[MyList.IndexOf(Sender)+1];
              
              tt[j].Free ;
              mylist.Delete(MyList.IndexOf(Sender)+1)
           end;
     end
创建多个的时候,删除的时候,不能删除指定的控件?