ich versteh immer noch nicht warum man die bilder nicht einfach in eine liste packt beim erzeugen und beim abschießen eines bildes dieses aus der liste entfernt. dann braucht man nur noch diese Liste durchgehen am ende und die restlichen frei geben.
Die Benutzung von FindComponent find ich bissl *krass* Der Name sagt ja schon "Find".
Wenn ich ein Auto habe und es irgendwo parke merke ich mir doch auch wo ich es abgestellt hab und spaare mir somit später die halbe Stadt danach abzusuchen.
Delphi-Quellcode:
ImgListe : TList;
[...]
//Erzeugen der Images
MyImage = TImage.Create(nil);
MyImage.Parent := ....
....
ImgListe.Add(MyImage);
[...]
//Abschießen des Images
Sender.Free;
ImgListe.Remove(Sender);
[...]
//Freigeben der restlichen Images
for i := ImgListe.Count - 1 downto 0 do
TObject(ImgListe.Items[i]).Free;