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

Вниз

TMenuItem_&_Icons   Найти похожие ветки 

 
fester   (2002-07-28 23:51) [0]

Кто знает, как сделать красивые иконки в меню? А то так корявые получаются:

With MenuItem.Bitmap do
begin
ic:=ExtractAssociatedIcon(0,filename,index);
Width:=31;
Height:=31;
TransparentColor:=clWhite;/////////////////
DrawIcon(Canvas.Handle,0,0,Ic);
end;


 
Poirot   (2002-07-29 06:02) [1]

Ну во-первых "бери поразмеру"....
Естественное положение с растрами....
А во-вторых нафига ты их так добавляешь.... Можно-ж TImageList юзать... т.е также в рунтайм грузить, тока успевай индексы к меню присваивать.... :)


 
Song   (2002-07-29 08:02) [2]

Если Ваша иконка больше чем надо, используйте DrawIconEx()


 
fester   (2002-07-29 12:08) [3]

Ну в общем проблема-то в том, что у меня белый цвет получается прозрачный. И если в иконке есть этот цвет, то получается криво. Если не ставить TransparentColor:=clWhite, то по краям изображения заливка белая. Может надо как-то с масками работать ???
---Ну а с размерами вроде все нормально :-)



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

Форум: "Основная";
Текущий архив: 2002.08.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.008 c
1-35285
Explorer
2002-07-31 08:26
2002.08.12
DBLookupComboBox


14-35428
MIFI
2002-07-07 12:12
2002.08.12
Люди в чорном 2


1-35261
Daiz13
2002-07-31 10:39
2002.08.12
Чем создать патч


3-35212
chsv
2002-07-23 20:34
2002.08.12
как подружить d5 с sql server 2000 без БДЕ?


1-35281
Эмиль
2002-07-31 15:43
2002.08.12
LoadFromStream





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