erzeugts IImage Löschen?

[smart]

Hi.

So erzeuge ich die Images:

Delphi-Quellcode:

Var I:Integer;
...

I := 0;
...

I := I + 1;
Mein_Bild[I] := TImage.Create(Form1);
  With Mein_Bild[I] do
    begin
      Parent := Form1;
      Width := Bild.Width div 5;
      Height := Bild.Height div 5;
      Tag := I;
      Stretch := True;
      Picture.Bitmap := Bild;
      OnClick := LosClick;
    end;

Wenn ich mit der Maus auf dem entsprechende Bild klicke soll es löschen:

Delphi-Quellcode:

procedure TForm1.LosClick(Sender: TObject);
begin
   Mein_Bild[TImage(Sender).Tag].Free;
end;

Gruß
Heike