WinAPIEx UDF

[Yashied]

_WinAPI_GetEffectiveClientRect - $Ret declared but not used.

Fixed.

[guinness]

Yashied,

Have a look at this #2192, seems certain constants are already declared,

[Yashied]

Fixed.

[guinness]

Thanks. $ERROR_NO_TOKEN in APIErrors.au3 wasn't commented out as it's included in SecurityConstants.au3 so I commented it out and closed the Trac Ticket.

Edited July 16, 2012 by guinness

[AdmiralAlkex]

The return value for the DllCall in _WinAPI_GetEnhMetaFileDescription was changed from UINT to INT but the MSDN docs say it should be UINT. What's up with that?

[Yashied]

The return value for the DllCall in _WinAPI_GetEnhMetaFileDescription was changed from UINT to INT but the MSDN docs say it should be UINT. What's up with that?

This is only used for error retrieving (-1) where is more convenient to use INT type.

[step887]

Love all your functions, I think they are great..

I have been trying to puzzle one out, but I can not puzzle out the callback

If it is not too much trouble, could you add emun font sizes function?

http://www.catch22.net/tuts/fixed-width-font-enumeration

[Myicq]

This is a TRUE 5 star UDF.

One question: would it be possible to add CultureInfo + examples of using it (in help file).

See

http://msdn.microsoft.com/en-us/library/yck8b540.aspx#Y0

Could look like:
$culture = _WinApi_GetCultureInfo("de-DE")

ConsoleWrite('German LocaleID ==> ' & _WinApi_CultureInfo("LCID") & @cr)
; must return 1031 as per assigned LCID list

That way it would be trivial to make f.ex a language selector with localized names and everything being correct. AND to automagically setup a GUI for R2L writing systems.

Just a suggestion...

[ZipleR]

Firstly - I have to say you have a huge amount of functions built into this and must be a scriptaholic.... Nice work.

Before you start attending SAA, would you be able to add any terminal services API's? Specifically WTSEnumerateSessions?

Here's a list I found from Microsoft of functions they support.

Terminal Services API Functions

The following functions are used with Terminal Services.

ProcessIdToSessionId

VirtualChannelClose

VirtualChannelEntry

VirtualChannelInit

VirtualChannelInitEvent

VirtualChannelOpen

VirtualChannelOpenEvent

VirtualChannelWrite

WTSCloseServer

WTSDisconnectSession

WTSEnumerateProcesses

WTSEnumerateSessions

WTSFreeMemory

WTSLogoffSession

WTSOpenServer

WTSQuerySessionInformation

WTSQueryUserConfig

WTSSendMessage

WTSSetUserConfig

WTSShutdownSystem

WTSTerminateProcess

WTSVirtualChannelClose

WTSVirtualChannelOpen

WTSVirtualChannelPurgeInput

WTSVirtualChannelPurgeOutput

WTSVirtualChannelQuery

WTSVirtualChannelRead

WTSVirtualChannelWrite

WTSWaitSystemEvent

ProcessIdToSessionId

Thanks! And hope you consider adding a few of these..

Edited September 18, 2012 by ZipleR

[JScript]

@Yashied

I have one suggestion for you:

FindWindowEx

I did a code I'm using, but I know you will do much better!

Edit: Anyway here's the code I made, if you think that gives to use it, of course!:

; #FUNCTION# ====================================================================================================================
; Name ..........: _WinAPI_FindWindowEx
; Description ...: Retrieves a handle to a window whose class name and window name match the specified strings.
; Syntax ........: _WinAPI_FindWindowEx($sClassName, $sWindowName[, $hParent = 0[, $hChildAfter = 0]])
; Parameters ....: $sClassName  - The class or atom created by a previous call to the RegisterClass or RegisterClassEx function.
;                                    The atom must be placed in the low-order word of lpszClass; the high-order word must be zero.
;                                    If lpszClass is a string, it specifies the window class name. The class name can be any name
;                                    registered with RegisterClass or RegisterClassEx, or any of the predefined control-class names,
;                                    or it can be MAKEINTATOM(0x8000). In this latter case, 0x8000 is the atom for a menu class.
;                  $sWindowName - The window name (the window's title). If this parameter is NULL, all window names match.
;                  $hParent     - [optional] A handle to the parent window whose child windows are to be searched.
;                                    If hwndParent is NULL, the function uses the desktop window as the parent window.
;                                    The function searches among windows that are child windows of the desktop.
;                                    If hwndParent is HWND_MESSAGE, the function searches all message-only windows.
;                  $hChildAfter - [optional] A handle to a child window. The search begins with the next child win in the Z order.
;                                    The child window must be a direct child window of hParent, not just a descendant window.
;                                    If hwndChildAfter is NULL, the search begins with the first child window of hwndParent.
;                                    If hParent and hChildAfter are NULL, the function searches all top-level and message-only.
; Return values .: Success      - The handle to the window
;                  Failure      - 0
; Author ........: JScript
; Modified ......:
; Remarks .......: The function searches child windows, beginning with the one following the specified child window.
;                This function does not perform a case-sensitive search.
; Related .......:
; Link ..........: @@MsdnLink@@ FindWindowEx
; Example .......: No
; ===============================================================================================================================
Func _WinAPI_FindWindowEx($sClassName, $sWindowName, $hParent = 0, $hChildAfter = 0)
    Local $aResult = DllCall("user32.dll", "hwnd", "FindWindowEx", "hwnd", $hParent, "hwnd", $hChildAfter, "wstr", $sClassName, "wstr", $sWindowName)
    If @error Then Return SetError(@error, @extended, 0)
    Return $aResult[0]
EndFunc   ;==>_WinAPI_FindWindowEx

Thank you,

JS

Edited November 4, 2012 by JScript

[netegg]

Hi, Yahied,

I find that I can not change display resolution from 800x600 to 1376x768(max resolution) by using function_winapi_changescreenresex. How could I do?

[Yashied]

I find that I can not change display resolution from 800x600 to 1376x768(max resolution) by using function_winapi_changescreenresex. How could I do?

I don't know because I didn't wrote this function or something like.

Edited November 20, 2012 by Yashied

[GaRydelaMer]

Hi all

@Yashied, you can add this functions to your next version.

Exemples:

Local $Number = -123456.569
ConsoleWrite(_WinAPI_GetCurrencyFormat(0, $Number) & @CR)
ConsoleWrite(_WinAPI_GetCurrencyFormat(0, $Number, _WinAPI_CreateCurrencyFormatInfo(2, 1, 3, ',', ' ', 8, 3, '€')) & @CR)

$Number = 123456.569
ConsoleWrite(_WinAPI_GetCurrencyFormat(0, $Number) & @CR)
ConsoleWrite(_WinAPI_GetCurrencyFormat(0, $Number, _WinAPI_CreateCurrencyFormatInfo(2, 1, 3, ',', ' ', 8, 3, '€')) & @CR)

Functions:

expandcollapse popup

Global Const $tagNUMBERFMT = 'uint NumDigits;uint LeadingZero;uint Grouping;ptr DecimalSep;ptr ThousandSep;uint NegativeOrder;'

Global Const $tagCURRENCYFMT = $tagNUMBERFMT & 'uint PositiveOrder;ptr CurrencySymbol;'

; #FUNCTION# ====================================================================================================================
; Name...........: _WinAPI_CreateCurrencyFormatInfo
; Description....: Creates a $tagCURRENCYFMT structure with the specified number formatting information.
; Syntax.........: _WinAPI_CreateCurrencyFormatInfo ( $iNumDigits, $iLeadingZero, $iGrouping, $sDecimalSep, $sThousandSep, $iNegativeOrder, $iPositiveOrder, $sCurrencySymbol )
; Parameters.....: $iNumDigits   - The number of fractional digits placed after the decimal separator.
;                 $iLeadingZero   - Specifier for leading zeros in decimal fields, valid values:
;                 |0 - No leading zeros.
;                 |1 - Leading zeros.
;                 $iGrouping      - The number of digits in each group of numbers to the left of the decimal separator. The values
;                                   in the range 0 through 9 and 32 are valid. Typical examples are: 0 to group digits as in 123456789.00;
;                                   3 to group digits as in 123,456,789.00; and 32 to group digits as in 12,34,56,789.00.
;                 $sDecimalSep    - The decimal separator string.
;                 $sThousandSep   - The thousand separator string.
;                 $iNegativeOrder - The negative number mode, valid values:
;                 |0 - for example, (€1.1).
;                 |1 - for example, -€1.1.
;                 |2 - for example, €-1.1.
;                 |3 - for example, €1.1-.
;                 |4 - for example, (1.1€).
;                 |5 - for example, -1.1€.
;                 |6 - for example, 1.1-€.
;                 |7 - for example, 1.1€-.
;                 |8 - for example, -1.1 €.
;                 |9 - for example, -€ 1.1.
;                 |10- for example, 1.1 €-.
;                 |11 - for example, € 1.1-.
;                 |12 - for example, € -1.1.
;                 |13- for example, 1.1- €.
;                 |14- for example, (€ 1.1).
;                 |15- for example, (1.1 €).
;                 $iPositiveOrder - The positive number mode, valid values:.
;                 |0 - for example, €1.1.
;                 |1 - for example, 1.1€.
;                 |2 - for example, € 1.1.
;                 |3 - for example, 1.1 €.
; Return values..: $tagCURRENCYFMT structure that contains number formatting information.
; Author.........: GaRy delaMer
; Modified.......:
; Remarks........: Typically, the structure returned by this function is used in the _WinAPI_GetCurrencyFormat() function.
; Related........:
; Link...........: @@MsdnLink@@ CURRENCYFMT
; Example........: Yes
; ===============================================================================================================================

Func _WinAPI_CreateCurrencyFormatInfo($iNumDigits, $iLeadingZero, $iGrouping, $sDecimalSep, $sThousandSep, $iNegativeOrder, $iPositiveOrder, $sCurrencySymbol)

    Local $tFMT = DllStructCreate($tagCURRENCYFMT & 'wchar[' & (StringLen($sDecimalSep) + 1) & '];wchar[' & (StringLen($sThousandSep) + 1) & '];wchar[' & (StringLen($sCurrencySymbol) + 1) & ']')

    DllStructSetData($tFMT, 1, $iNumDigits)
    DllStructSetData($tFMT, 2, $iLeadingZero)
    DllStructSetData($tFMT, 3, $iGrouping)
    DllStructSetData($tFMT, 4, DllStructGetPtr($tFMT, 9))
    DllStructSetData($tFMT, 5, DllStructGetPtr($tFMT, 10))
    DllStructSetData($tFMT, 6, $iNegativeOrder)
    DllStructSetData($tFMT, 7, $iPositiveOrder)
    DllStructSetData($tFMT, 8, DllStructGetPtr($tFMT, 11))
    DllStructSetData($tFMT, 9, $sDecimalSep)
    DllStructSetData($tFMT, 10, $sThousandSep)
    DllStructSetData($tFMT, 11, $sCurrencySymbol)

    Return $tFMT
EndFunc   ;==>_WinAPI_CreateCurrencyFormatInfo

; #FUNCTION# ====================================================================================================================
; Name...........: _WinAPI_GetCurrencyFormat
; Description....: Formats a number string as a number string customized for a locale specified by identifier.
; Syntax.........: _WinAPI_GetCurrencyFormat ( $LCID, $sNumber [, $tCURRENCYFMT] )
; Parameters.....: $LCID       - The locale identifier (LCID) that specifies the locale or one of the following predefined values.
;
;                               $LOCALE_INVARIANT
;                               $LOCALE_SYSTEM_DEFAULT
;                               $LOCALE_USER_DEFAULT
;
;                               Windows Vista or later
;
;                               $LOCALE_CUSTOM_DEFAULT
;                               $LOCALE_CUSTOM_UI_DEFAULT
;                               $LOCALE_CUSTOM_UNSPECIFIED
;
;                 $sNumber    - The string containing the number string to format. This string can only contain the following
;                               characters. All other characters are invalid.
;
;                               Characters "0" through "9".
;                               A minus sign in the first character position if the number is a negative value.
;                               One decimal point (dot) if the number is a floating-point value.
;
;                 $tCURRENCYFMT - $tagCURRENCYFMT structure that contains number formatting information. If this parameter is omitted
;                               or 0, the function returns the string according to the number format for the specified locale.
;                               You can use the _WinAPI_CreateCurrencyFormatInfo() function to create this structure.
; Return values..: Success   - The formatted number string.
;                 Failure    - Empty string and sets the @error flag to non-zero.
; Author.........: GaRy delaMer
; Modified.......:
; Remarks........: None
; Related........:
; Link...........: @@MsdnLink@@ GetCurrencyFormat
; Example........: Yes
; ===============================================================================================================================

Func _WinAPI_GetCurrencyFormat($LCID, $sNumber, $tCURRENCYFMT = 0)

    If Not $LCID Then
        $LCID = 0x0400
    EndIf

    Local $Ret = DllCall('kernel32.dll', 'int', 'GetCurrencyFormatW', 'ulong', $LCID, 'dword', 0, 'wstr', $sNumber, 'ptr', DllStructGetPtr($tCURRENCYFMT), 'wstr', '', 'int', 2048)

    If (@error) Or (Not $Ret[0]) Then
        Return SetError(1, 0, '')
    EndIf
    Return $Ret[5]
EndFunc   ;==>_WinAPI_GetCurrencyFormat

Edited November 28, 2012 by GaRydelaMer

[guinness]

Will you be making any subsequent changes to this UDF? Thanks.

[jmon]

[...]
;$iGrouping 
[...]
;Typical examples are: 0 to group digits as in 123456789.00;
;3 to group digits as in 123,456,789.00; and 32 to group digits as in 12,34,56,789.00.
[...]

Looks like you made a typo in your example (You wrote '32 to group digits' instead of '2'). Edited January 16, 2013 by jmon

[Kovacic]

Where can I find the latest? I am getting the duplicate function name on line 8108 in file WinAPIE.au3

I am using Version: 3.8 / 3.3.6.1

[JohnOne]

http://www.autoitscript.com/site/autoit/downloads/

latest release version is 3.3.8.1

[Kovacic]

Sorry, let me rephrase that, I am using AutoIt Version: 3.3.8.1

The version of WinAPIE.au3 I found says 3.8 / 3.3.6.1 in it.

I am getting errors when even just trying to execute the include. I am using Win7 btw.

[Kovacic]

Nevermind, I have the latest autoit, I downloaded the wrong version of the script. Too much of a hurry.

[ModemJunki]

Hi, I was messing around with this in Win7 x64 and I found that _WinAPI_GetVolumeInformation seems not to be working?

#include <WinAPIEx.au3>

$s_label = _WinAPI_GetVolumeInformation("C:\")

ConsoleWrite("Label = " & $s_label & @CRLF)

I do know one can use DriveGetLabel, this works.

#include <WinAPIEx.au3>

$s_label = DriveGetLabel("C:\")

ConsoleWrite("Label = " & $s_label & @CRLF)

Any idea why? Is it just me?