Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.013 c
3-64038
skiph
2003-02-27 09:39
2003.03.20
File not found


6-64267
Y
2003-01-31 15:11
2003.03.20
Сообщения через Excange


3-63969
FREEMAN
2003-02-27 00:36
2003.03.20
Вопрос по работе с БД


1-64096
Gimer
2003-03-10 16:03
2003.03.20
Буржуйский clipboard (буфер)


14-64293
dim-
2003-03-05 09:58
2003.03.20
База сотовых телефонов