Текущий архив: 2003.03.20;
Скачать: CL | DM;

Вниз

Stream не хочет сохранять полноцветные значки   Найти похожие ветки 

← →
msoftware ©   (2003-03-09 05:37) [0]

В ниже преведенном коде, значок из TImageList транслируется в TImage, но не в полном цвете, а только в 16 цветов, Почему????

var MStream: TMemoryStream;
Icon: TIcon;
begin
Icon:=TIcon.Create;
try
MStream:=TMemoryStream.Create;
try
Imagelist1.GetIcon(0,Icon);
Icon.SaveToStream(MStream);
MStream.Position:=0;
Image1.Picture.Icon.LoadFromStream(MStream);
finally
MStream.Free;
end;
finally
Icon.Free;
end;
end;

---

← →
msoftware ©   (2003-03-10 02:57) [1]

помогите пожалуйста

---

← →
msoftware ©   (2003-03-10 04:56) [2]

ПЫМЫХИТЕЕЕЕ!!!!

---

← →
ЮЮ ©   (2003-03-11 07:58) [3]

Note: TIcon can be used to display the value of a multi-resolution (>16 color) icon. However, it can not support the creation of multi-resolution icons, nor the resizing of the image after it is loaded from a file or stream.

---

← →
ЮЮ ©   (2003-03-11 08:21) [4]

И дело здесь не в Stream. при TIcon.SaveToFile тоже получается 16-цветная иконка. Сл-но дело в реализации методов TIcon.SaveToXXX

---

← →
msoftware ©   (2003-03-11 08:50) [5]

Дак чтож теперь, безвыходное положение что-ли???

---

← →
msoftware ©   (2003-03-11 09:51) [6]

ПЫМЫХИТЕЕЕЕ!!!!

---

← →
hooch ©   (2003-03-11 10:00) [7]

ImageList.GetBitmap

---

← →
_landy   (2003-03-11 10:01) [8]

Попробуй выдергивать иконку в TBitmap или в TImage и сохранять так. Битмапы в потоке сохраняются полноцветные.

---

Страницы: 1 вся ветка

Текущий архив: 2003.03.20;
Скачать: CL | DM;

Наверх

Память: 0.48 MB
Время: 0.014 c