Excel. Трюки и эффекты
Отрывок из книги
Довольно интересный эффект постепенного исчезновения, а затем появления формы можно реализовать, применив следующий код (листинг 1.9). ... Листинг 1.9. Исчезновение и появление формы implementation var isInc: Boolean; // Если True, то значение AlphaBlend формы // увеличивается, если False, то уменьшается //(форма скрывается) procedure TForm1.cmbHideAndShowClick(Sender: TObject); begin if AlphaBlend then chkEnableAlpha.Checked:= False; //Включаем прозрачность (подготовка к плавному скрытию) AlphaBlendValue:= 255; AlphaBlend:= True; Refresh; //Запускаем процесс скрытия формы isInc:= False; Timer1.Enabled:= True; end; procedure TForm1.Timer1Timer(Sender: TObject); var val: Integer; begin if not isInc then begin //"Растворение" окна val:= AlphaBlendValue; Dec(val, 10); if val <= 0 then begin //Окно полностью прозрачно val:= 0; isInc:= True; end end ...
Книги из серии:
Трюки и эффекты
[6.0 рейтинг книги]
Комментарии:
Популярные книги
Гримуар тёмного лорда I
Фантастика
:фэнтези
,попаданцы
,аниме
.
5.00
рейтинг книги
Кодекс Охотника. Книга ХХХ
30. Кодекс Охотника
Фантастика
:попаданцы
,аниме
,фэнтези
.
5.00
рейтинг книги
Адвокат империи
1. Адвокат империи
Фантастика
:городское фэнтези
,попаданцы
,фэнтези
.
5.75
рейтинг книги
Инженер Петра Великого 2
2. Инженер Петра Великого
Фантастика
:попаданцы
,альтернативная история
,фэнтези
.
5.00
рейтинг книги
Бракованная невеста. Академия драконов
Фантастика
:фэнтези
,сказочная фантастика
.
5.00
рейтинг книги
Изгой Проклятого Клана. Том 6
6. Изгой
Фантастика
:аниме
,фэнтези
,фантастика: прочее
,попаданцы
.
5.00
рейтинг книги
Паладин из прошлого тысячелетия
1. Соприкосновение миров
Фантастика
:боевая фантастика
,попаданцы
.
6.25
рейтинг книги
Симфония теней
3. Хроники геноцида
Фантастика
:попаданцы
,фэнтези
.
5.00
рейтинг книги
Мастер 7
7. Мастер
Фантастика
:фэнтези
,боевая фантастика
,попаданцы
,технофэнтези
,аниме
.
5.00
рейтинг книги
Вперед в прошлое 6
6. Вперед в прошлое
Фантастика
:попаданцы
,альтернативная история
.
5.00
рейтинг книги
Газлайтер. Том 26
26. История Телепата
Фантастика
:боевая фантастика
,попаданцы
,аниме
.
5.00
рейтинг книги
Имя нам Легион. Том 6
6. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00
рейтинг книги
На границе империй. Том 10. Часть 1
Вселенная EVE Online
Фантастика
:космическая фантастика
,попаданцы
.
5.00
рейтинг книги
Газлайтер. Том 3
3. История Телепата
Фантастика
:попаданцы
,альтернативная история
,аниме
.
5.00
рейтинг книги
Тайны затерянных звезд. Том 2
2. Тайны затерянных звезд
Фантастика
:боевая фантастика
,космическая фантастика
,космоопера
,фэнтези
.
5.00
рейтинг книги
Имя нам Легион. Том 18
18. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00
рейтинг книги
Имя нам Легион. Том 1
1. Меж двух миров
Фантастика
:боевая фантастика
,рпг
,аниме
.
5.00