Es tut sich also auch tatsächlich nichts, wenn ich so alle Bilder in "Bild" einzeln freeandnille:
Delphi-Quellcode:
freeandnil(bild.current);
freeandnil(bild.original);
for i := 1 to 10 do
freeandnil(bild.last[i]);
freeandnil(bild);
bild := Tbild.init;
bild.open(pname);