Out of system resources beim hinzufügen von Icon Zu ImageList

[Shark99]

Ich kriege eine (in dem Fall) merkwürdige Out of System Resources Exception beim Laden eines bestimmten Icons (icon.ico). Mit anderen Icons funktioniert der Code. Andere Programme (Explorer, ThumbsPlus) können diese Icon aber korrekt anzeigen.

Habe ein Beispielprojekt inkl des Icons angehängt.

Code:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Icon: TIcon;
begin
     try
          Icon := TIcon.Create;
          Icon.LoadFromFile('icon.ico');
          ImageList1.AddIcon(Icon);
          Caption := IntToStr(ImageList1.Count);
     finally
          Icon.Free;
     end;
end;