Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
1-64142
s.ts
2003-03-07 10:59
2003.03.20
TMemo.Lines.Count


14-64386
SergeN
2003-03-05 08:02
2003.03.20
МК-61, МК-52, ...


1-64139
Intell
2003-03-07 06:15
2003.03.20
Как сделать мерцающую надпись?


1-64227
Leviathan
2003-03-09 16:57
2003.03.20
ValueListEditor


9-63922
Nostradamus
2002-10-12 21:53
2003.03.20
DrawRotate




   Наверх