home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_1 / CUSGEN12 / SETUP1.GLB < prev    next >
Encoding:
Text File  |  1993-01-14  |  734 b   |  14 lines
  1. DefInt A-Z
  2.  
  3. Global Const SRCCOPY = &HCC0020
  4.                      
  5. Declare Function GetWindowsDirectory Lib "Kernel" (ByVal lpBuffer As String, ByVal nSize As Integer) As Integer
  6. Declare Function GetSystemDirectory Lib "Kernel" (ByVal lpBuffer As String, ByVal nSize As Integer) As Integer
  7. Declare Function BitBlt Lib "Gdi" (ByVal destHdc, ByVal X, ByVal Y, ByVal w, ByVal h, ByVal srcHdc, ByVal srcX, ByVal srcY, ByVal Rop As Long)
  8.  
  9. Declare Sub GetFileVersion Lib "SETUPKIT.DLL" (ByVal FileName$, ByVal szBuf$, ByVal LenBuf%)
  10. Declare Function DiskSpaceFree Lib "SETUPKIT.DLL" () As Long
  11. Declare Function AllocUnit Lib "SETUPKIT.DLL" () As Long
  12. Declare Function SetTime Lib "SETUPKIT.DLL" (ByVal A$, ByVal b$) As Integer
  13.  
  14.