Attribute VB_Name = "Module1"
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
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 Const SW_SHOW = 5
Public Const SW_HIDE = 0

Global Const HOURGLASS = 11
Global Const DEFAULT = 0

Global Const COM_VER_STRING = ".140"

Global Const RASTER_STR = "LEADRaster.LEADRaster" + COM_VER_STRING
Global Const RASTERIO_STR = "LEADRasterIO.LEADRasterIO" + COM_VER_STRING
Global Const RASTERPROC_STR = "LEADRasterProcess.LEADRasterProcess" + COM_VER_STRING
Global Const RASTERANN_STR = "LEADRasterAnnotation.LEADRasterAnnotation" + COM_VER_STRING
Global Const RASTERANNTB_STR = "LEADRasterAnnToolBar.LEADRasterAnnToolBar" + COM_VER_STRING
Global Const LEAD_LIC_STR = "LEADTOOLS OCX Copyright (c) 1991-2000 LEAD Technologies, Inc."