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

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

работа с формой [D5]


PITON ©   (2003-09-12 11:18:00) 

Здравствуйте.
Подскажите как сделать плавное появление формы на экране
средствами Delphi


Vagrant   (2003-09-16 03:08:00) [1]

Для W9x попробуй
AnimateWindow(Handle, 180, AW_VER_POSITIVE or AW_HOR_POSITIVE)


Vagrant   (2003-09-16 03:05:00) [2]

Sorry! Правильно так:
AnimateWindow(Handle, 180, AW_BLEND) - появление
AnimateWindow(Handle, 180, AW_BLEND OR AW_HIDE)- скрытие


Vagrant   (2003-09-16 03:03:00) [3]

AnimateWindowProc(Handle, 180, AW_BLEND) - появление
AnimateWindowProc(Handle, 180, AW_BLEND OR AW_HIDE)- скрытие


Woolen   (2003-09-12 15:26:00) [4]

Удалено модератором
Примечание: Offtopic


Woolen   (2003-09-12 15:25:00) [5]

Удалено модератором
Примечание: Offtopic


Игорь Шевченко   (2003-09-12 15:01:00) [6]


>как сделать на 95,98,NT4


Никак не сделать :) Только на Win2k/WinXP и может быть WinMe


Woolen   (2003-09-12 14:50:00) [7]


> PITON (12.09.03 14:45) [4]
> Спасибо!
> Это другое дело.
> Я так понял, что это свойства формы AlphaBlend

да свойства, но ты пишешь на пятерке, а в пятерке этого нет, я проверил. В Дельфи 6 - не знаю, а в 7 - есть точно.


PITON   (2003-09-12 14:45:00) [8]

Спасибо!
Это другое дело.
Я так понял, что это свойства формы AlphaBlend


Woolen   (2003-09-12 14:22:00) [9]


> AnimateWindow?
> AlphaBlend?

Ставишь AlphaBlend в True, а AlphaBlendValue - 0. Потом по таймеру и по GetTickCount (настоятельно рекомендую мультимедийный таймер) увеличиваешь постепенно это значение с каим-нибудь приемлемым интервалом. Чем плавнее, тем эффектнее. Единственное, я не помню, по-моему, в Дельфи-пятерке этого не было... и еще нужна 2000 или XP. На счет Me - не знаю, на младших осях не работает - точно. Например, на NT 4 просто ничего не будет происходить и окно появися как все - сразу.
Могу подсказать, как сделать на 95,98,NT4 и прочих, но это еще подумать надо. Не все так просто... Если потребуется - дай знать... Я попробую сделать...


PITON   (2003-09-12 14:22:00) [10]

Спасибочки......
Нельзя ли по подробнее написать?


[lamer]Barmaglot   (2003-09-12 11:41:00) [11]

AnimateWindow?
AlphaBlend?


Наверх

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