Attribute VB_Name = "Module1"
' MPX-Windows.MMScript - Windows API constants
' ============================================

' Windows API
' http://msdn.microsoft.com/library/psdk/shellcc/shell/Functions/ShellExecute.htm

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, _
	ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, _
	ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Public Declare Function GetFocus Lib "user32" Alias "GetFocus" () As Long

Public Declare Function GetLocaleInfo Lib "kernel32" Alias "GetLocaleInfoA" (ByVal Locale As Long, _
	ByVal LCType As Long, ByVal lpLCData As String, ByVal cchData As Long) As Long

Public Const LOCALE_SCURRENCY = &H14 ' local monetary symbol
Public Const LOCALE_SMONDECIMALSEP = &H16 ' monetary decimal separator
Public Const LOCALE_SMONTHOUSANDSEP = &H17 ' monetary thousand separator
Public Const LOCALE_SMONGROUPING = &H18 ' monetary grouping
Public Const LOCALE_ICURRDIGITS = &H19 ' # local monetary digits
Public Const LOCALE_SDATE = &H1D ' date separator
Public Const LOCALE_IDATE = &H21 ' short date format ordering
Public Const LOCALE_ILDATE = &H22 ' long date format ordering
Public Const LOCALE_STIME = &H1E ' time separator
Public Const LOCALE_ITIME = &H23 ' time format specifier
Public Const LOCALE_S1159 = &H28 ' AM designator
Public Const LOCALE_S2359 = &H29 ' PM designator
Public Const LOCALE_SDAYNAME1 = &H2A ' long name for Monday
Public Const LOCALE_SDAYNAME2 = &H2B ' long name for Tuesday
Public Const LOCALE_SDAYNAME3 = &H2C ' long name for Wednesday
Public Const LOCALE_SDAYNAME4 = &H2D ' long name for Thursday
Public Const LOCALE_SDAYNAME5 = &H2E ' long name for Friday
Public Const LOCALE_SDAYNAME6 = &H2F ' long name for Saturday
Public Const LOCALE_SDAYNAME7 = &H30 ' long name for Sunday

Public Const LOCALE_SMONTHNAME1 = &H38        '  long name for January
Public Const LOCALE_SABBREVMONTHNAME1 = &H44        '  abbreviated name for January
