...wenn ich das Verzeichniss zum dritten Mal aufrufe:
Delphi-Quellcode:
ImageList.Clear;
Icon := TIcon.Create;
try
Icon.LoadFromFile(ExtractFilePath(ParamStr(0)) + 'Icon_1.ico');
ImageList.AddIcon(Icon)
finally
Icon.Free;
end;
Was ist eigentlich in der ImageList, wenn Du ständig 'Icon.Free' aufrufst?