Преобразование ICO в BMP II советует:

Чтобы преобразовать Icon в Bitmap используйте TImageList. для обратного преобразования замените метод AddIcon на Add, и метод GetBitmap на GetIcon.

function Icon2Bitmap(Icon: TIcon): TBitmap; begin with TImageList.Create (nil) do beginAddIcon (Icon);Result := TBitmap.Create;GetBitmap (0, Result);Free;end;end;

[000909]

Содержание раздела

---

---

---

Главная сайта

---