Autor Beitrag
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 22.05.17 17:48 
- Nachträglich durch die Entwickler-Ecke gelöscht -
jfheins
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 868
Erhaltene Danke: 145

Win7
VS 2013, VS2015
BeitragVerfasst: Mo 22.05.17 19:02 
Du setzt beim freigeben mit FreeAndnil nur die Variable "Bilder" auf nil. Wenn du bspw. das dritte Bild freigibst, ist Bilder zwar nil, in Bilder[2] steht aber noch der (jetzt ungültige) Verweis.

Baue einfach in die Prozedur EinzelnesBildLoeschenClick noch eine Schleife ein, die den Verweis auch aus dem Array löscht:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
procedure TForm1.EinzelnesBildLoeschenClick(Sender: TObject);
begin
  for i := 0 to High(Bilder)
    if Bilder[i] = Bild
      Bilder[i] = nil;

  FreeAndNil(Bild);
end;
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mo 22.05.17 19:25 
- Nachträglich durch die Entwickler-Ecke gelöscht -
haentschman
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 285
Erhaltene Danke: 33


DX10 Berlin Professional
BeitragVerfasst: Di 23.05.17 17:32 
Hallöle... :P
Hat das einen tieferen Sinn das du die modernen Features nicht nutzt. :wink:
Anstelle des Array of TImage hätte ich eine TObjectlist<TImage> genommen. Erstens keine Beschränkungen in der Grösse bzw. Grösseneinstellung und keine Probleme mir der Freigabe der Images.
Alle Bilder löschen: entweder DELETE oder CLEAR oder mit der Listenfreigabe der Instanz FREE

...fertsch :P
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Di 23.05.17 20:13 
- Nachträglich durch die Entwickler-Ecke gelöscht -
haentschman
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 285
Erhaltene Danke: 33


DX10 Berlin Professional
BeitragVerfasst: Mi 24.05.17 04:44 
Moin... 8)
Sorry...ich hatte Delphi 10.1 Starter in deinem Profil gelesen. :?
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Mi 24.05.17 06:38 
- Nachträglich durch die Entwickler-Ecke gelöscht -