Loads a picture from file and returns a bitmap or icon handle.
Handle := LoadPicture(Filename , Options, ByRef ImageType)
The filename of the picture, which is usually assumed to be in A_WorkingDir if an absolute path isn't specified. If the name of a DLL or EXE file is given without a path, it may be loaded from the directory of the current executable (AutoHotkey.exe or a compiled script) or a system directory.
A string of zero or more of the following options, with each separated from the last by a space or tab:
Wn and Hn: The width and height to load the image at, where n is an integer. If one dimension is omitted or -1, it is calculated automatically based on the other dimension, preserving aspect ratio. If both are omitted, the image's original size is used. If either dimension is 0, the original size is used for that dimension. For example: "w80 h50", "w48 h-1" or "w48" (preserve aspect ratio), "h0 w100" (use original height but override width).
Iconn: Indicates which icon to load from a file with multiple icons (generally an EXE or DLL file). If n is non-zero, the file must contain an icon. For example, "Icon2" loads the file's second icon.
GDI+: Use GDI+ to load the image, if available. For example, "GDI+ w100".
The unquoted name of a variable in which to store an integer representing the type of handle which is returned: 0 (IMAGE_BITMAP), 1 (IMAGE_ICON) or 2 (IMAGE_CURSOR). If omitted or not a variable, the return value is always a bitmap handle (icons/cursors are converted if necessary).
LoadPicture also supports the handle syntax, such as for creating a resized image based on an icon or bitmap which has already been loaded into memory, or converting an icon to a bitmap by omitting ImageType.
If the image needs to be freed from memory, call whichever function is appropriate for the type of handle.
if (not ImageType) ; IMAGE_BITMAP (0) or the ImageType parameter was omitted.
DllCall("DeleteObject", "ptr", Handle)
else if (ImageType = 1) ; IMAGE_ICON
DllCall("DestroyIcon", "ptr", Handle)
else if (ImageType = 2) ; IMAGE_CURSOR
DllCall("DestroyCursor", "ptr", Handle)
; Pre-load and reuse some images.
Pics := []
; Find some pictures to display.
Loop Files, A_WinDir "\Web\Wallpaper\*.jpg", "R"
{
; Load each picture and add it to the array.
Pics.Push(LoadPicture(A_LoopFileFullPath))
}
if !Pics.Length()
{
; If this happens, edit the path on the Loop line above.
MsgBox("No pictures found! Try a different directory.")
ExitApp
}
; Add the picture control, preserving the aspect ratio of the first picture.
Gui := GuiCreate()
Pic := Gui.Add("Pic", "w600 h-1 vPic +Border", "HBITMAP:*" Pics.1)
Gui.OnEvent("Escape", "Gui_Escape")
Gui.Show
Loop
{
; Switch pictures!
Pic.Value := "HBITMAP:*" Pics[Mod(A_Index, Pics.Length())+1]
Sleep 3000
}
Gui_Escape() {
ExitApp
}