Return to winkern.inc CVS log

Up to [WindowsNT SDKs] / mstools / mstest / include

Annotation of mstools/mstest/include/winkern.inc, revision 1.1.1.1

1.1       root        1: '******************************** WINKERN.INC *********************************
                      2: ' WINKERN.INC
                      3: '
                      4: ' SAMPLE Declarations for 32-bit KERNEL functions callable from MS Test.  This
                      5: ' does NOT represent all of the functions available in KERNEL32.DLL that are
                      6: ' callable from an MS Test script.  If you need to use a function in KERNEL32
                      7: ' that is not declared in this file, simply add the declaration to this file.
                      8: '******************************************************************************
                      9: 
                     10: '$ifndef _WINKERN
                     11: 
                     12: '$ifndef _WNAPIDEC
                     13: ' The following are duplicated in WNAPIDEC.INC for FASTTEST...
                     14: '------------------------------------------------------------------------------
                     15: Declare Function WinExec           Lib "Kernel32" ALIAS "WinExec" (lpCmdLine$, nCmdShow%) As Integer
                     16: '$endif
                     17: 
                     18: Declare Function GetVersion        Lib "Kernel32" ALIAS "GetVersion" () As Integer
                     19: Declare Function GetNumTasks       Lib "Kernel32" ALIAS "GetNumTasks" () As Integer
                     20: Declare Function GetModuleHandle   Lib "Kernel32" ALIAS "GetModuleHandleA" (lpModuleName$) As Integer
                     21: Declare Function GetModuleUsage    Lib "Kernel32" ALIAS "GetModuleUsage" (hModule%) As Integer
                     22: Declare Function GetModuleFileName Lib "Kernel32" ALIAS "GetModuleFileNameA" (hModule%,  lpFilename$, nSize%) As Integer
                     23: Declare Sub OutputDebugString      Lib "Kernel32" ALIAS "OutputDebugString" (lpOutputString$)
                     24: 
                     25: '  OpenFile() Structure
                     26: Type OFSTRUCT
                     27:     cBytes As String * 1
                     28:     fFixedDisk As String * 1
                     29:     nErrCode As Integer
                     30:     reserved As String * 4
                     31:     szPathName As String * 128
                     32: End Type
                     33: 
                     34: '$define _WINKERN
                     35: '$endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.