img
00:00
imgФорум Delphi: Пример анимированной заставки с альфаканалом
imgimgimg
Форумы Delphi Пример анимированной заставки с альфаканалом (Всего сообщений: 15)Страницы:  01  02 
antonn

Старожил

Профиль
1 | #990 | цитата02-11-2008 18:26
Пример создания заставки (Splash), обычно отображающей долгую загрузку программы, с альфаканалом. Вывод текста, прогресса загрузки, бонус - плавное появление иконок модулей smiley


Прикрепленные файлы:
AnimateSplash_thread.zip - (280.58 Kb) Кол-во скачиваний: 2389
Сами знаете откуда
Новичок

Профиль
2 | #1051 | цитата15-01-2009 13:37
Антон, привет.
Наконец дошли руки до разбирательств с твоим творением smiley Надо сделать сплэш, для проекта, который тогда, когда я у тебя просил его реализовать (выше описанный сплэш), был еще только в зачатке. Но вот и до него (сплэша) дошла очередь. И возникли у меня некоторые проблемы, которых, кстати, не было на предыдущей версии (happynewyaer). Не получается у меня сделать фоновую картинку.
Если тебе удобно, можем обсудить это на том форуме, а можем и здесь, как скажешь.
Жду ответа.
Сами знаете откуда
Новичок

Профиль
3 | #1052 | цитата15-01-2009 15:51
Ладно, начну писать тут.

Это то, что я нарисовал:
450909.png

Это
427357.png
и это
432477.png
то, что выдал альфабилдер при разборе png (масштаб 56%)

Это
419165.png
то, что получилось при помощи предыдущей версии сплэша (happynewyaer_splash). Как видим всё так как мы и ожидали.

Это
410973.png
альфабилдер сделал такой .bmp из .png

И это
408925.png
то, что мы получаем в новой версии сплэша.

Помоги с решением, пожалуйста.
antonn

Старожил

Профиль
4 | #1053 | цитата15-01-2009 22:19
Прикрепи сюда в архиве первый png, но кажется кальфа не затирается кое где...
Сами знаете откуда
Новичок

Профиль
5 | #1054 | цитата15-01-2009 22:43
Вот.
Прикрепленные файлы:
Splash.rar - (169.37 Kb) Кол-во скачиваний: 1324
antonn

Старожил

Профиль
6 | #1055 | цитата15-01-2009 23:45
Пересобери битмап без галки Lighting smiley
Когда она есть два битмапа просто сливаются вместе. Когда ее нет, то RGB вычисляются так:
delphi
RowOut[x].rgbBlue:=byte(trunc(RowIn[x].rgbtBlue*RowOut[x].rgbReserved/255));
RowOut[x].rgbGreen:=byte(trunc(RowIn[x].rgbtGreen*RowOut[x].rgbReserved/255));
RowOut[x].rgbRed:=byte(trunc(RowIn[x].rgbtRed*RowOut[x].rgbReserved/255));

Т.е. в зависимости от альфы видимая сторона темнее. Если просто закрасишь белые области на видимой стороне то результат будет тотже (а без галки оно так и делает, разбери обратно битмап и глянь smiley ).
Updatelayeredwindow() использует неполную формулу блендинга, из-за чего приходится вот так геморроиться.
antonn

Старожил

Профиль
7 | #1056 | цитата15-01-2009 23:47
я просто не знаю, это правильно или нет, поэтому и вывел опцию, на всякий случай smiley
Сами знаете откуда
Новичок

Профиль
8 | #1057 | цитата16-01-2009 00:36
Ок, завтра на работе посмотрю.
Сами знаете откуда
Новичок

Профиль
9 | #1058 | цитата16-01-2009 08:49
Ага, работает. Спасибо smiley
Сами знаете откуда
Новичок

Профиль
10 | #1061 | цитата21-01-2009 13:26
Привет.
Антон, а что означает эта загадочная закоментированная строка "//p_u.Pack_Memory(_MBi smiley ;" в модуле PackList_Bitmaps? Хотелось бы ея раскоментировать smiley Поделись модулем smiley
Форумы Delphi Пример анимированной заставки с альфаканалом (Всего сообщений: 15)Страницы:  01  02 
Тему просматривают: 1 гостей, 0 пользователей
Ваше Имя:
 
22000/22000 [Справка по кодам]
 Защита от спамботовВведите ответ:
Пример анимированной заставки с альфаканалом | Ответов: 15
 
Вход
Имя:
Пароль:
Запомнить
Регистрация Забыли пароль?
Мини-чат :)
Необходима регистрация
Архив мини-чата
18-06-2018 01:11
m_j
Антоха, прувэт!
11-06-2018 23:21
Broyck
Можно ли найти откуда был запущен сайт? broyck@yandex.ru Жду обратную связь
31-05-2018 21:22
AliceGrou
да но у меня снег
22-05-2018 19:52
Programmer
уже май, готовы к лету
30-04-2018 23:32
AliceGrou
Ех щас бы в паука сыгратт
30-04-2018 23:31
AliceGrou
Точнее, а чего мы хотели
30-04-2018 23:30
AliceGrou
Ну да, а чего ты хотел?
30-04-2018 22:57
antonn
Жизнь - боль.
30-04-2018 21:56
AliceGrou
Ваня Кориков,не смотри сюда
30-04-2018 21:49
AliceGrou
Когда ты зашел на сайт,хочешь пообщаться с челиками,а ты один онли (((((((((((((((((((((((( ((((((((((((((((((((((((( (((((((((
Статистика
 СегодняВсего
Посетителей1051811824
Запросов964300844740
Online
Пользователей0
Гостей23
imgimgimgimg
 
img
     00:00