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

Вниз

Load в TImage при MouseMove   Найти похожие ветки 

 
Neznaika ©   (2005-02-08 16:04) [0]

Есть картинки которые в будущем должны стать кнопками на форме.
Когда курсор мыши проходит над такой кнопкой, кнопка должна подсветится т.е. надо сменить картинку. Если это делать с помощью LoadFromFile -все работает но при движении мыши возникает сильное мерцание картинки. Засунул все картинки в ресурс - мелькание прекратилось, но при частой смене картинок загрузка проца слишком велика. И еще поставляемый вместе с Delphi ImageEditor позволяет создать BitMap в ресурсе, максимум на 256 цветов а мне этого мало!

Вообщем вопрос заключается в следующем: по какому событию лучше менять изображение кнопок и других компонентов. И как в ресурс запихать полноцветную картинку?

Заранее всем огромное спасибо! С уважением...


 
Алхимик ©   (2005-02-08 16:47) [1]

1)
Посмотри как в TCustomLabel реализованы события
OnMouseEnter и OnMouseLeave. По аналгии сделай наследника от TImage
2)
Создаёшь текстовый файл MyRes.RC, пишешь в нём
1 BITMAP 1.bmp
2 BITMAP 2.bmp
Компилируешь его
BRCC32.EXE MyRes.RC

В программе загружаешь картинку из ресурсов.
MyBitMap.LoadFromResourceID(hInstance,1);


 
begin...end ©   (2005-02-08 16:50) [2]

> Neznaika ©   (08.02.05 16:04)

> по какому событию лучше менять изображение

CM_MOUSEENTER, CM_MOUSELEAVE


 
Neznaika ©   (2005-02-08 17:12) [3]

СПАСИБО!

А на счет полноцветной картики в ресурсе?



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

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

Наверх





Память: 0.45 MB
Время: 0.039 c
3-1105871854
cherrex
2005-01-16 13:37
2005.02.20
DBGRID и Excel


1-1107241841
Gek1
2005-02-01 10:10
2005.02.20
Innerfuse Pascal Script


6-1102352885
Anonimus
2004-12-06 20:08
2005.02.20
как скачать страницу


14-1107322087
sapsi
2005-02-02 08:28
2005.02.20
Secret net


14-1106835258
Ega23
2005-01-27 17:14
2005.02.20
ААААААААААААААЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕЕ!!!!!!!!!!!!





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