KOD cpp: UKRYJ
void __fastcall TfrmMain::LoadImage(UnicodeString FileName)
{
UnicodeString path = FileName;
Gdiplus::Image image(WideString(path).c_bstr() );
Gdiplus::Graphics grphx(imgPage->Canvas->Handle);
imgPage->Picture->Bitmap->Width=image.GetWidth();
imgPage->Picture->Bitmap->Height=image.GetHeight();
grphx.DrawImage(&image, 0, 0, imgPage->Picture->Bitmap->Width, imgPage->Picture->Bitmap->Height);
}
{
UnicodeString path = FileName;
Gdiplus::Image image(WideString(path).c_bstr() );
Gdiplus::Graphics grphx(imgPage->Canvas->Handle);
imgPage->Picture->Bitmap->Width=image.GetWidth();
imgPage->Picture->Bitmap->Height=image.GetHeight();
grphx.DrawImage(&image, 0, 0, imgPage->Picture->Bitmap->Width, imgPage->Picture->Bitmap->Height);
}
I teraz problem:
Zmienia się rozmiar TImage ale bitmapa jest całą biała. Może jakiś pomysł? Mi już witki opadły...





