DefInt A-Z

Declare Function WRitePrivateProfileString Lib "Kernel" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpString As String, ByVal lplFileName As String) As Integer
Declare Function GetPrivateProfileString Lib "Kernel" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
Declare Function ExitWindows Lib "User" (ByVal dwReserved As Long, ByVal wReturnCode As Integer) As Integer
Declare Function GetDosEnvironment& Lib "Kernel" ()
Declare Sub Str2LP Lib "VBPOINT.DLL" (SP As Any, DP As Any, ByVal nBytes)
Declare Function LStrLen Lib "Kernel" (ByVal LPSTR&)
Declare Function LP2Str$ Lib "VBPOINT.DLL" (LP As Any, ByVal pLen)
Global Handoff As Integer
Global ConfigName(5) As String
Global ConfigFile(5) As String
Global Const True = -1
Global Const False = 0
Global Windir As String
Global SysFile As String
Global WasRecordChanged
Global Const IDYES = 6
Global Const IDNO = 7
Global WorkingFileName As String
Global FileNum As Integer