ypppu
Почему не могу создать GUI?
Kогда создаю окно, скрипт закрывается!
Мне нужно создать прозрачное окно с кнопками поверх этого изображения!
;#######################################################################
2osx := 1905
2osx += 852
1osx := A_ScreenWidth
1osx /= 2
1osx -= 456
#SingleInstance, Force
#NoEnv
SetBatchLines, -1
#Include, Gdip.ahk
pToken := Gdip_Startup()
OnExit, Exit
Gui, 1: -Caption +E0x80000 +LastFound +AlwaysOnTop +ToolWindow +OwnDialogs
Gui, 1: Show, NA
hwnd1 := WinExist()
pBitmap := Gdip_CreateBitmapFromFile("test.png")
Width := 2osx, Height := 1836
hbm := CreateDIBSection(Width//2, Height//2) ,hdc := CreateCompatibleDC()
obm := SelectObject(hdc, hbm) ,G := Gdip_GraphicsFromHDC(hdc)
Gdip_SetInterpolationMode(G, 7)
Gdip_DrawImage(G, pBitmap, 1osx, 0, Width//2, Height//2, 0, 0, Width//1, Height//1)
UpdateLayeredWindow(hwnd1, hdc, 0, 0, Width//2, Height//2)
SelectObject(hdc, obm) ,DeleteObject(hbm) ,DeleteDC(hdc)
Gdip_DeleteGraphics(G), Gdip_DisposeImage(pBitmap)
;~ Return
;#######################################################################
Gui, Add, button, x70 y305 w90 h30 gexit, ОК
Gui, Show, x0 y0 h342 w231,
Return
exit:
Gdip_Shutdown(pToken)
ExitApp
return