---

#NoEnv
#SingleInstance Force
#Include %A_ScriptDir%\Gdip_All.ahk

F3::

pToken := Gdip_Startup()

if (!pToken)
{
    MsgBox, 16, Ошибка, GDI+ НЕ ЗАПУСТИЛСЯ.
    return
}

MsgBox, 64, Тест, GDI+ успешно запустился.`n`nНажми OK для проверки скриншота.

pBitmap := Gdip_BitmapFromScreen(0)

if (!pBitmap)
{
    Gdip_Shutdown(pToken)
    MsgBox, 16, Ошибка, GDI+ запустился, но Gdip_BitmapFromScreen НЕ СОЗДАЛ СКРИНШОТ.
    return
}

FilePath := A_ScriptDir "\test_screen.png"

Result := Gdip_SaveBitmapToFile(pBitmap, FilePath)

Gdip_DisposeImage(pBitmap)
Gdip_Shutdown(pToken)

if (Result != 0)
{
    MsgBox, 16, Ошибка, Скриншот создан в памяти, но не удалось сохранить PNG.`nКод ошибки: %Result%
    return
}

MsgBox, 64, Успех, Скриншот успешно создан!`n`nФайл:`n%FilePath%

return