Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Скинообразная кнопка [D7, WinXP]


xkiller ©   (2004-11-14 13:38:00) 

Написал я тут компонент, скинообразную кнопочку, работающую на основе трех изображений... Первое изображение (PictureUp), когда кнопка не нажата, второе (PictureMove), когда курсор мыши находится над кнопкой, третье (PictureDown), когда кнопка нажата... Сообщение у меня получилось слишком длинное, поэтому я в несколько сообщений его сделаю...


xkiller   (2004-11-14 14:16:00) [1]

у shwPictureMove нет свойства transporent...

type
TShowSkinSpBtnPict = (shwPictureUp, shwPictureMove, shwPictureDown);


-=SS=-   (2004-11-14 14:05:00) [2]

Вообще то  у тебя неравильно построина концепция смены картинок (зависимость от сообщений)
1. Когда на кнопку не наведена мышь и  она не нажата — состояние 1
2. Когда на кнопке находится мышь — состояние 2 (обрабатывай MouseEnter)
3. Когда забираем Мышь с кнопки — состояние 3 (обрабатывай сообщение MouseLeave) и возврат в состояние 1
4. Кнопка Нажата — состояние 4 (mouseDown)
5. Кнопка отпущена — Состояние 5 (mouseUp) возврат в состояние 2

=============================================
shwPictureMove.Ttransparent:=True;
FShowPictute := shwPictureMove;
Paint;


xkiller   (2004-11-14 13:42:00) [3]

Удалено модератором


xkiller   (2004-11-14 13:41:00) [4]

Удалено модератором


xkiller   (2004-11-14 13:39:00) [5]

Удалено модератором
Примечание: Размести ссылку в Сети, не захламляй форум


Наверх

Титульная страница Поиск, карта сайта Написать письмо