Get the size of the parameter list for a specified image encoder
#include <GDIPlus.au3>
_GDIPlus_EncodersGetParamListSize ( $hImage, $sEncoder )
$hImage | Handle to an image object |
$sEncoder | GUID string of encoder to be used |
Success: | the size, in bytes, of the parameter list. |
Failure: | 0 and sets the @error flag to non-zero, @extended may contain GPSTATUS error code ($GPIP_ERR* see GPIPlusConstants.au3). |
Search GdipGetEncoderParameterListSize in MSDN Library.
#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <ScreenCapture.au3>
#include <WinAPIConv.au3>
#include <WinAPIHObj.au3>
#include <WindowsConstants.au3>
Global $g_idMemo, $g_aCodex, $g_hImage
Example()
Func Example()
Local $hBitmap
; Create GUI
GUICreate("GDI+", 600, 400)
$g_idMemo = GUICtrlCreateEdit("", 2, 2, 596, 396, $WS_VSCROLL)
GUICtrlSetFont($g_idMemo, 9, 400, 0, "Courier New")
GUISetState(@SW_SHOW)
; Initialize GDI+ library
_GDIPlus_Startup()
; Create an image to use for paramater lists
$hBitmap = _ScreenCapture_Capture("", 0, 0, 1, 1)
$g_hImage = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap)
; Show encoder parameters
$g_aCodex = _GDIPlus_Encoders()
ShowCodex("Encoder")
; Show decoder parameters
$g_aCodex = _GDIPlus_Decoders()
ShowCodex("Decoder")
; Clean up resources
_GDIPlus_ImageDispose($g_hImage)
_WinAPI_DeleteObject($hBitmap)
; Shut down GDI+ library
_GDIPlus_Shutdown()
; Loop until the user exits.
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
EndFunc ;==>Example
; Write a line to the memo control
Func MemoWrite($sMessage = '')
GUICtrlSetData($g_idMemo, $sMessage & @CRLF, 1)
EndFunc ;==>MemoWrite
; Show codex information
Func ShowCodex($sTitle)
Local $iI, $iJ, $iK, $sCLSID, $tData, $tParam, $tParams, $iParamSize = _GDIPlus_ParamSize()
For $iI = 1 To $g_aCodex[0][0]
$sCLSID = _GDIPlus_EncodersGetCLSID($g_aCodex[$iI][5])
MemoWrite("Image " & $sTitle & " " & $iI)
MemoWrite(" Codec GUID ............: " & $g_aCodex[$iI][1])
MemoWrite(" File format GUID ......: " & $g_aCodex[$iI][2])
MemoWrite(" Codec name ............: " & $g_aCodex[$iI][3])
MemoWrite(" Codec Dll file name ...: " & $g_aCodex[$iI][4])
MemoWrite(" Codec file format .....: " & $g_aCodex[$iI][5])
MemoWrite(" File name extensions ..: " & $g_aCodex[$iI][6])
MemoWrite(" Mime type .............: " & $g_aCodex[$iI][7])
MemoWrite(" Flags .................: 0x" & Hex($g_aCodex[$iI][8]))
MemoWrite(" Version ...............: " & $g_aCodex[$iI][9])
MemoWrite(" Signature count .......: " & $g_aCodex[$iI][10])
MemoWrite(" Signature size ........: " & $g_aCodex[$iI][11])
MemoWrite(" Signature pattern ptr .: 0x" & Hex($g_aCodex[$iI][12]))
MemoWrite(" Signature mask ptr ....: 0x" & Hex($g_aCodex[$iI][13]))
;~ If $sTitle = "Decoder" Then ContinueLoop
MemoWrite(" Parameter list size ...: " & _GDIPlus_EncodersGetParamListSize($g_hImage, $sCLSID))
$tParams = _GDIPlus_EncodersGetParamList($g_hImage, $sCLSID)
If @error Then
MemoWrite()
ContinueLoop
EndIf
MemoWrite(" Parameters Count ......: " & DllStructGetData($tParams, "Count"))
MemoWrite()
For $iJ = 0 To DllStructGetData($tParams, "Count") - 1
MemoWrite(" Image " & $sTitle & " " & $iI & " Parameter " & $iJ)
$tParam = DllStructCreate($tagGDIPENCODERPARAM, DllStructGetPtr($tParams, "GUID") + ($iJ * $iParamSize))
MemoWrite(" Parameter GUID ......: " & _WinAPI_StringFromGUID(DllStructGetPtr($tParam, "GUID")))
MemoWrite(" Number of values ....: " & DllStructGetData($tParam, "NumberOfValues"))
MemoWrite(" Parameter type.......: " & DllStructGetData($tParam, "Type"))
MemoWrite(" Parameter pointer ...: 0x" & Hex(DllStructGetData($tParam, "Values")))
Switch DllStructGetData($tParam, "Type")
Case 4
$tData = DllStructCreate("int Data[" & DllStructGetData($tParam, "NumberOfValues") & "]", DllStructGetData($tParam, "Values"))
For $iK = 1 To DllStructGetData($tParam, "NumberOfValues")
MemoWrite(" Value .............: " & DllStructGetData($tData, 1, $iK))
Next
Case 6
$tData = DllStructCreate("int Low;int High", DllStructGetData($tParam, "Values"))
MemoWrite(" Low range .........: " & DllStructGetData($tData, "Low"))
MemoWrite(" High range ........: " & DllStructGetData($tData, "High"))
EndSwitch
MemoWrite()
Next
Next
EndFunc ;==>ShowCodex