'==============================================================================
'
'  Common Routines
'  Copyright (c) 1997 by PowerBASIC, Inc.
'
'  Declares for 32-bit Visual Basic
'
'==============================================================================

Declare Function Exist Lib "COMMON32.DLL" Alias "EXIST" (Filename As String) As Integer
Declare Function FreeSpace Lib "COMMON32.DLL" Alias "FREESPACE" (ByVal drive As Integer) As Long
Declare Function GetBValue Lib "COMMON32.DLL" Alias "GETBVALUE" (ByVal rgb As Long) As Long
Declare Function GetGValue Lib "COMMON32.DLL" Alias "GETGVALUE" (ByVal rgb As Long) As Long
Declare Function GetRValue Lib "COMMON32.DLL" Alias "GETRVALUE" (ByVal rgb As Long) As Long
Declare Function IsNT3 Lib "COMMON32.DLL" Alias "ISNT3" () As Long
Declare Function IsWin95 Lib "COMMON32.DLL" Alias "ISWIN95" () As Long
Declare Function NetUserName Lib "COMMON32.DLL" Alias "NETUSERNAME" () AS STRING
Declare Function Processor Lib "COMMON32.DLL" Alias "PROCESSOR" () AS STRING
Declare Function TotalSpace Lib "COMMON32.DLL" Alias "TOTALSPACE" (ByVal drive As Integer) As Long
Decalre Sub CalcPageSize Lib "COMMON32.DLL" Alias "CALCPAGESIZE" (ByVal hDC As Long, Rows As Long, Columns As Long)
Declare Sub CenterWindow Lib "COMMON32.DLL" Alias "CENTERWINDOW" (ByVal hWnd As Long)
Declare Sub SplitPath Lib "COMMON32.DLL" Alias "SPLITPATH" (Source As String, Fldrive As String, Flpath As String, Filename As String)
