Скинообразная кнопка

← →
xkiller (2004-11-14 13:38) [0]

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

← →
xkiller (2004-11-14 13:39) [1]

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

← →
xkiller (2004-11-14 13:41) [2]

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

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

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

Вообще то у тебя неравильно построина концепция смены картинок (зависимость от сообщений)
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 14:16) [5]

у shwPictureMove нет свойства transporent...
type TShowSkinSpBtnPict = (shwPictureUp, shwPictureMove, shwPictureDown);

Скинообразная кнопка Найти похожие ветки