#include <GDIPlus.au3>

; ===============================================================================================================================
; Description ...: Показывает как преобразовать BMP-файл в JPG
; Author ........: Paul Campbell (PaulIA)
; Notes .........:
; ===============================================================================================================================

; Получает BMP-файл для преобразования
Local $sImage = InputBox("BMP в JPG", "Введите путь к файлу:", @MyDocumentsDir & "\Image.bmp", "", 200, 130)
If @error Or Not FileExists($sImage) Then Exit -1

; Инициализирует библиотеку GDI+
_GDIPlus_Startup()

; Загружает изображение
Local $hImage = _GDIPlus_ImageLoadFromFile($sImage)

; Получает CLSID кодировщика JPG
Local $sCLSID = _GDIPlus_EncodersGetCLSID("JPG")

; Сохраняет изображение как JPG
_GDIPlus_ImageSaveToFileEx($hImage, @MyDocumentsDir & "\AutoItImage.jpg", $sCLSID)

; Закрывает библиотеку GDI+
_GDIPlus_Shutdown()
