c++ builder XE4, 10.2 Tokyo > TImage > 가져올 이미지 크기에 맞게 TImage 크기 변경

C++ Builder XE4
RAD Studio 10.2 Tokyo Update 2 (追記: 2017/12/28)

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include <pngimage.hpp>
//#include <Jpeg.hpp>
#include <memory>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    // Image1->Stretch = true;

    String filename = L"site-logo.png";

    std::unique_ptr<TPicture> pict(new TPicture);
    pict->LoadFromFile(filename);

    Image1->Width = pict->Width;
    Image1->Height = pict->Height;

    Image1->Picture->LoadFromFile(filename);
}
//---------------------------------------------------------------------------