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     ! 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.