Hier ist der erste Fehler
Delphi-Quellcode:
AResourceStream := TResourceStream.Create(hInstance, 'TestBar', PChar('RT_RCDATA'));
AResourceStream := TResourceStream.Create(hInstance, 'TestBar', RT_RCDATA);
Und mit
Image1.Picture.Bitmap.LoadFromStream(AResourceStream);
kannst Du kein PNG Laden.