| ← Январь 2016 → | ||||||
|
1
|
2
|
3
|
||||
|---|---|---|---|---|---|---|
|
4
|
5
|
6
|
7
|
8
|
9
|
10
|
|
11
|
15
|
16
|
17
|
|||
|
18
|
19
|
20
|
21
|
22
|
23
|
24
|
|
26
|
27
|
28
|
29
|
30
|
31
|
|
За последние 60 дней ни разу не выходила
Сайт рассылки:
http://rusfaq.ru/
Открыта:
14-03-2002
Статистика
0 за неделю
RFpro.ru: Программирование на Delphi и Lazarus
| РАССЫЛКИ ПОРТАЛА RFPRO.RU
Лучшие эксперты по данной тематике
/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Delphi и Lazarus
Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:
Дата отправки: 08.01.2016, 11:37 Консультирует Евгений/Genia007/ (Профессионал): Здравствуйте, arujan.nurlankul23! Код : function AnimateWindow(hwnd: HWND, dwTime: DWord, dwFlags: DWord); Параметры hwnd - Дескриптор окна, которое анимируется. Вызывающий поток должен владеть этим окном. dwTime - Устанавливает, сколько необходимо времени, чтобы воспроизвести мультипликацию, в миллисекундах. Как правило, воспроизведение мультипликации занимает 200 миллисекунд. dwFlags - Определяет тип мультипликации. Этот параметр может быть одно или несколько нижеследующих значений. Обратите внимание! что, по умолчанию, эти флажки дают желаемый результат при показе окна. Чтобы получать желаемый результат при сокрытии окна, используйте флажок AW_HIDE и логический оператор OR с соответствующими флажками. AW_SLIDE Использует слайдовую анимацию. По умолчанию используется анимационный ролик (прокрутка мультипликации). Этот флажок игнорируется тогда, когда пользуется с флажком AW_CENTER. AW_ACTIVATE Активизирует окно (при показе окна). Не используйте это значение совместно с AW_HIDE. AW_BLEND Использует эффект постепенного изменения прозр ачности окна. Этот флажок может быть использован только в том случае, если параметр hwnd - окно верхнего уровня. AW_HIDE Скрывает окно. По умолчанию, окно показывается на экран. AW_CENTER Делает вид окна сжатым в точку, если используется флажок AW_HIDE или раскрытым из точки до полного размера, если флажок AW_HIDE не используется. Различные предписывающие флаги не имеют никакого действия. AW_HOR_POSITIVE Анимирует окно слева направо. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND. AW_HOR_NEGATIVE Анимирует окно справа налево. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND. AW_VER_POSITIVE Анимирует окно сверху вниз. Этот флажок может быть использованы с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND. AW_VER_NEGATI VE Анимирует окно снизу вверх. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND. Вот пример использования, где заставка открывается с анимацией и потом закрывается, на форме есть таймер на 5 сек (5000). Код : procedure Tzast.FormShow(Sender: TObject);
begin
AnimateWindow(Handle,1000,AW_BLEND); // Анимация окна в виде плавного проявления
end;
procedure Tzast.Timer1Timer(Sender: TObject);
begin
Close;
end;
procedure Tzast.FormHide(Sender: TObject);
begin
AnimateWindow(Handle,500,AW_BLEND or AW_HIDE); // Анимация окна в виде плавного ухода
end;
procedure Tzast.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:= caFree;
end;
procedure Tzast.FormCreate(Sender: TObject);
var FormRgn: hRgn;
begin
FormRgn := CreateRoundRectRgn(5, 5, 492, 433, 200, 200); // Создали полигон в виде квадрата с закруглёнными углами
SetWindowRgn(zast.Handle, FormRgn, TRUE); // Установили форму окну по полигону
end;Код : procedure Tzurnals.FormShow(Sender: TObject);
begin
zast.Left:= screen.Width div 2 - 250;
zast.Top:= screen.Height div 2 - 220;
zast.ShowModal;
end;
Оценить выпуск | Задать вопрос экспертам
главная страница
|
стать участником
|
получить консультацию
|
| В избранное | ||
