ios - Delphi ios 在 ImageControl 中缩放位图

Question

我有 75*75 .png 文件，但我希望它们显示在具有透明背景的 150x150 大小的 ImageControl 中。我目前使用此代码:

  FBitmapBufferLoadFromFile(...);
  icContactsDetails.Bitmap := TBitmap.Create(0, 0);
  icContactsDetails.Bitmap.Assign(FBitmapBuffer);
  icContactsDetails.Width := icContactsDetails.Bitmap.Width;
  icContactsDetails.Height := icContactsDetails.Bitmap.Height;
  icContactsDetails.Scale.X := 150 / icContactsDetails.Bitmap.Width;
  icContactsDetails.Scale.Y := 150 / icContactsDetails.Bitmap.Height;

我有以下问题:

1) 如何保持透明度？ (.png 中的透明区域被转换为白色。) 2) 我应该在 ImageControl 之外进行缩放以避免设置宽度/高度吗？

Answer 1

设置

icContactsDetails.WrapMode:=TImageWrapMode.iwStretch

而不是缩放控件。