PNG to TIF

  • Hallo,
    weiß vlt. einer wie ich mit Autoit Bilder von PNG zu TIF konvertiere?
    Es kann auch eine kleine externe Anwendung ähnlich wie bei ffmpeg sein, jedoch sollte die Anwendung schon recht klein sein! unter ~1mb!
    Hat da jemand was?
    Lösung:

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    _Main()

    [/autoit] [autoit][/autoit] [autoit]

    Func _Main()
    Local $hBitmap, $hImage, $sCLSID, $tData, $tParams
    ; Initialisiert (startet) Microsoft Windows GDI+
    _GDIPlus_Startup()

    [/autoit] [autoit][/autoit] [autoit]

    ; Lädt ein Bild
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\iamge.png")

    [/autoit] [autoit][/autoit] [autoit]

    ; Gibt die Encoder CLSID für einen festgelegten Bild-Dateityp zurück
    $sCLSID = _GDIPlus_EncodersGetCLSID("TIF")

    [/autoit] [autoit][/autoit] [autoit]

    ; Setzt die Parameter für eine 90 Grad Rotation
    $tData = DllStructCreate("int Data")
    DllStructSetData($tData, "Data", $GDIP_EVTTRANSFORMROTATE90)
    $tParams = _GDIPlus_ParamInit(1)
    _GDIPlus_ParamAdd($tParams, $GDIP_EPGTRANSFORMATION, 1, $GDIP_EPTLONG, DllStructGetPtr($tData, "Data"))

    [/autoit] [autoit][/autoit] [autoit]

    ; Speichert das gedrehte Bild
    _GDIPlus_ImageSaveToFileEx($hImage, @ScriptDir & "\image.tif", $sCLSID, DllStructGetPtr($tParams))

    [/autoit] [autoit][/autoit] [autoit]

    ; Gibt die durch Microsoft Windows GDI+ verwendeten Ressourcen wieder frei
    _GDIPlus_Shutdown()

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>_Main

    [/autoit]