Как загрузить изображение png из потока в TImage

#include <memory>
#include <pngimage.hpp>
 
std::auto_ptr<TMemoryStream> MS(new TMemoryStream);
//std::auto_ptr<TPngImage> PngImage1(new TPngImage);
try
    {
        IdHTTP1->Get(Url,MS.get()) ;
        MS->SaveToFile("1.png");
        Image1->Picture->LoadFromFile("1.png");
    }
catch(EIdException &E)   // Ловим исключения Indy
    {
        ShowMessage("Ошибка:\n\""+E.Message+"\"");
    };

TPngImage * img1 = new TPngImage;
TPngImage * img2 = new TPngImage;
TMemoryStream * mem = new TMemoryStream;
 
img1->LoadFromFile("F:\\name.png");
img1->SaveToStream(mem);
 
mem->Seek(0,0);
img2->LoadFromStream(mem);
Image1->Picture->Assign(img2);
 
delete mem;
delete img1;
delete img2;

std::auto_ptr<TMemoryStream> MS(new TMemoryStream);
std::auto_ptr<TPngImage> PngImage1(new TPngImage);
try
    {
        IdHTTP1->Get(Url,MS.get()) ;
        MS->Position= 0;
        Image1->Picture->Assign(PngImage1.get() );
    }
catch(EIdException &E)   // Ловим исключения Indy
    {
        ShowMessage("Ошибка:\n\""+E.Message+"\"");
    };