ImageControl中的Delphi ios缩放位图



我有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之外进行缩放以避免设置宽度/高度吗?

设置

icContactsDetails.WrapMode:=TImageWrapMode.iwStretch

而不是缩放控件。

相关内容

  • 没有找到相关文章

最新更新