PNG und Bitmap laden

[Nils_13]

Schwierig zu sagen, ob es an der Bibliothek liegt oder an folgendem Code:

Delphi-Quellcode:

procedure Png2Bmp(var Bmp : TBitmap; PngFilename : String);
var Png : TGraphicExGraphic;
begin
  Bmp := TBitmap.Create;
  Png := TGraphicExGraphic.Create;
  try
    Png.LoadFromFile(PngFilename);
    Bmp.Assign(Png);
  finally
    Png.Free;
  end;
end;

Ich muss (leider) die ganzen Fremdformate konvertieren, da eine TImageList nur TBitmap oder TIcon unterstützt. Wäre eventuell eine bessere Lösung, die ImageList zu modifizieren, aber das klappt denke ich nicht, da ein Canvas grundsätzlich ein TBitmap benötigt. ABER man könnte trotzdem direkt ein Canvas.Draw(0, 0, PNG); einbauen, ob das sich positiv in der Performance ausdrückt und sich dementsprechend der Aufwand lohnt...gute Frage. Aber nun zum Code: Bitmap ungültig lautet die Fehlermeldung in der Zeile Bmp.Assign(Png).