Масштабируемое растровое изображение Delphi ios внутри ImageControl
У меня есть файлы 75*75 .png, но я хочу, чтобы они отображались в ImageControl размером 150x150 с прозрачным фоном. В настоящее время я использую этот код:
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, чтобы избежать настройки ширины / высоты?
1 ответ
Решение
Задавать
icContactsDetails.WrapMode:=TImageWrapMode.iwStretch
вместо масштабирования элемента управления.