Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.05.08;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.009 c
6-23256
CYBERDANYA
2003-03-12 22:56
2003.05.08
Proxy на Indy в Delphi 6


3-22932
DenKop
2003-04-18 07:35
2003.05.08
SQL dump данных Interbase 6.5


1-23076
Мыш
2003-04-25 14:09
2003.05.08
RXRichEdit


1-23174
NAlexey
2003-04-24 13:29
2003.05.08
FocusRect


1-23149
_MAXi_
2003-04-23 16:15
2003.05.08
TreeView Nodes разными цветами?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский