Attribute VB_Name = "APIs"
Option Explicit

'Public Const GWL_WNDPROC = (-4)

Public Declare Function CallWindowProc Lib "user32" Alias _
"CallWindowProcA" (ByVal Adresse As Long, ByVal hwnd As Long, _
ByVal Msg As Long, ByVal WParam As Long, ByVal lParam 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 Declare Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
'Public Declare Function CallWindowProcA Lib "user32" (ByVal Adresse As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal WParam As Long, ByVal lParam As Long) As Long
'Public Declare Function CreateWindowEx Lib "user32" Alias "CreateWindowExA" (ByVal dwExStyle As Long, ByVal lpClassName As String, ByVal lpWindowName As String, ByVal dwStyle As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hWndParent As Long, ByVal hMenu As Long, ByVal hInstance As Long, lpParam As Long) As Long


Public uAppName As String
