Attribute VB_Name = "Module1"
Global Const HOURGLASS = 11
Global Const DEFAULT = 0

Global Const SO_LEAD = 0
Global Const SO_JFIF = 1
Global Const SO_JTIF = 2
Global Const SO_AWD = 3
Global Const SO_CALS = 4
Global Const SO_CUR = 5
Global Const SO_CCITT = 6
Global Const SO_DIC_GRAY = 7
Global Const SO_DIC_COLOR = 8
Global Const SO_EXIF = 9
Global Const SO_FAX = 10
Global Const SO_EPS = 11
Global Const SO_FPX = 12
Global Const SO_GEM = 13
Global Const SO_GIF = 14
Global Const SO_ICO = 15
Global Const SO_IOCA = 16
Global Const SO_PCT = 17
Global Const SO_MAC = 18
Global Const SO_MSP = 19
Global Const SO_OS2 = 20
Global Const SO_PCX = 21
Global Const SO_PNG = 22
Global Const SO_PSD = 23
Global Const SO_RAS = 24
Global Const SO_TGA = 25
Global Const SO_TIF = 26
Global Const SO_WBMP = 27
Global Const SO_WBMP_RLE = 28
Global Const SO_WFX = 29
Global Const SO_WMF = 30
Global Const SO_WPG = 31
Global Const NUM_SAVE_TYPES = 32
Global Const NUM_OPEN_TYPES = 23

Global Const QF_CUSTOM = 9

Global Const QFACTOR_PQ1 = 0
Global Const QFACTOR_PQ2 = 1
Global Const QFACTOR_QFS = 2
Global Const QFACTOR_QMS = 3
Global Const QFACTOR_QS = 4
Global Const QFACTOR_SQS = 5
Global Const QFACTOR_SQT = 6
Global Const QFACTOR_MCQ = 7
Global Const QFACTOR_MC = 8
Global Const QFACTOR_CUSTOM = 9

Global Const RESIZE_TYPE = 0
Global Const DETECT_TYPE = 1
Global Const STAMP_TYPE = 2

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