zed писал(а):Есть такое предложение, не знаю на сколько оно реализуемо: ползунок зума сделать "интерактивным" как это сделано на гугл мапс/ерз, т.е. сделать его прозрачным и чтоб он автоматом исчезал через некоторое время после использования, а при наведении курсора - опять появлялся. Место расположения - верхний правый угол (ну, или чтоб настраивалось).
Реализовал у себя на компе появляющуюся форму со слайдером. Использовал трэк бар из RaizeComponents, он лучше держит прозрачность. Также использовал компонент для придания форме овальности. Но это уже дело вкуса.
Настройки формы 2
- Код: Выделить всё
AlphaBlend = True
AlphaBlendValue = 0
BorderStyle = bsNone
Таймер
- Код: Выделить всё
object Timer1: TTimer
Enabled = False
Interval = 50
OnTimer = Timer1Timer
Итак поступил сигнал что надо отобразить слайдер
- Код: Выделить всё
Form2->AlphaBlendValue=0;
Form2->Show();
Form2->Tag=1;
Timer1->Enabled=true;
Событие в таймере
- Код: Выделить всё
if(Form2->AlphaBlendValue<=245) Form2->AlphaBlendValue+=10;
else
{
Form2->AlphaBlendValue=255;
Timer1->Enabled=false;
}
Деактивацию производить аналогично, но можно чуть побыстрее. В конце закрыть форму 2.
Ну и иллюстрация