1 Тема от Indomito

  • Indomito
  • Участник
  • Неактивен

Тема: AHK: Полноэкранная заставка.

Приветствую.
Мне нужно было вывести полноэкранная заставку и я недолго думая написал код. 

Gui, New , +OwnDialogs -caption +AlwaysOnTop +HwndMyFocus
Gui, Margin , 0, 0 ; без caption
Gui, Add, Picture, x0 y0 W%A_ScreenWidth% H%A_ScreenHeight% , C:\Users\SASA\Desktop\cr_DanFrazier-04-Blockbuster.jpg
Gui, Show
Return

GuiClose:
ExitApp

Но панель Пуск осталась.
Как вывести изображение  отмасштабированное и поверх панели Пуск?

http://i80.fastpic.ru/thumb/2016/0610/f8/86b248c51e56da24cabd9b9afbd16ef8.jpeg

"На каждое действие есть равная ему противодействующая критика." Постулат Харриссона
Для NotePad++(подсветка синтаксиса, автозавершение и плагины(AutoSave и RunMe).
OS Windows 10 x64 Pro

2 Ответ от Nikva (изменено: Nikva, 2016-06-10 10:51:17)

  • Nikva
  • Участник
  • Неактивен

Re: AHK: Полноэкранная заставка.

Gui, New , +OwnDialogs -caption +AlwaysOnTop +HwndMyFocus
Gui, Color , FFFFFF ; Цвет окна Gui
Gui, Margin , 0, 0 ; без caption
Gui, Add, Picture, x0 w%A_ScreenWidth% H-1 vpic hwndpic, C:\Users\SASA\Desktop\cr_DanFrazier-04-Blockbuster.jpg
ControlGetPos,,,,Height,,ahk_id %pic% ; Определение размера изображения
GuiControl, Move, Pic, % "y" (A_ScreenHeight-Height)/2 ; Передвигает картинку в центр по оси Y
Gui, Show, x0 y0 W%A_ScreenWidth% H%A_ScreenHeight% NA, Заставка
WinWaitActive, Заставка
GuiClose:
ExitApp
+ Indomito

3 Ответ от Indomito

  • Indomito
  • Участник
  • Неактивен

Re: AHK: Полноэкранная заставка.

Большое спасибо.

"На каждое действие есть равная ему противодействующая критика." Постулат Харриссона
Для NotePad++(подсветка синтаксиса, автозавершение и плагины(AutoSave и RunMe).
OS Windows 10 x64 Pro