Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.08;
Скачать: CL | DM;

Вниз

ImageList   Найти похожие ветки 

 
maksimenkon   (2003-04-24 17:47) [0]

Пожалуйста, помогите разобраться!!!....
Как в ImageList сохранить иконку, которая имеет больший размер, пропорционально уменьшив ее до нужного размера...

tblobfield(ADO_Icon.FieldByName("IconData")).savetostream(ms);
ms.Position := 0;
T:=TBitmap.Create;
tBitmap(T).loadfromstream(ms);
ImageList.Add...


В результате у меня иконки 32х32 делятся на части...


 
Юрий Федоров   (2003-04-24 17:56) [1]

Создай битмап нужного размера и перенеси изображение с исходного с помощью StretchBlt


 
maksimenkon   (2003-04-24 18:02) [2]

А примерчик можно посмотреть???


 
Юрий Федоров   (2003-04-24 18:08) [3]

специально пример писать лень, вся необходимая информация доступна по F1 (StretchBlt - из API)


 
maksimenkon   (2003-04-25 14:17) [4]

Идея понятна, но...
Подскажите, пожалуйста, что я делаю не правильно?

T:=TBitmap.Create;
tBitmap(T).loadfromstream(ms);
StretchBlt(T.Handle,0,0,32,32,T.Handle,0,0,T.Width,T.Height,0);
ImageListM.Add(...



 
MBo   (2003-04-25 14:22) [5]

T. Canvas.Handle

а ты в себя же StretchBlt делаешь - так и задумано?

tBitmap(T).loadfromstream(ms);
приведение типа ни к чему


 
maksimenkon   (2003-04-25 14:49) [6]

То что в себя- так и задуманно... но не работает...
Пробовал и T.Canvas.Handle - эфект тот же...

Может я не то делаю...
Проблема в том, что когда картинки маленькие - все нормально, а когда они больше 32х32 - ImageList делит ее на 2-е и более части... а мне нужно просто уменьшить и использовать как иконки в TreeView...



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
1-23090
FatalAcid
2003-04-26 14:13
2003.05.08
Стек CPU при вылете exception-а


3-22921
IgorP
2003-04-19 11:23
2003.05.08
Кто работает с MSSQL через dbexpress отзовитесь


3-22976
SiJack
2003-04-17 13:51
2003.05.08
Каскадное удаление в Access (ADO)


1-23098
I/O
2003-04-25 16:47
2003.05.08
клоны?!


3-22916
Sour
2003-04-19 08:34
2003.05.08
Выделить элемент TDBLookupListBox (TDBLookupComboBox)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский