Return to wnapidec.inc CVS log

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

Annotation of mstools/mstest/include/wnapidec.inc, revision 1.1

1.1     ! root        1: ' ------------------------------------------------------------------------
        !             2: '     WNAPIDEC.INC -- Windows 3.0 API Declarations for 32-bit FastTest
        !             3: '
        !             4: '              Copyright (C) 1991-1992 Microsoft Corporation
        !             5: '
        !             6: '  The following are provided for sample purposes only.  You should only
        !             7: '  copy the ones you use into your code in order to save code space and
        !             8: '  parse time.
        !             9: '
        !            10: '  You have a royalty-free right to use, modify, reproduce and distribute
        !            11: '  this file (and/or any modified version) in any way you find useful,
        !            12: '  provided that you agree Microsoft has no warranty, obligation or
        !            13: '  liability for its contents.  Refer to the Microsoft Windows Programmer's
        !            14: '  Reference for further information.
        !            15: '
        !            16: ' ------------------------------------------------------------------------
        !            17: '$define _WNAPIDEC          ' Define this so other includes don't redefine
        !            18:                             ' stuff defined in this include file
        !            19: 
        !            20: '$ifndef _WINUSER
        !            21: 
        !            22: ' Definitions stolen from WINUSER.INC
        !            23: '-----------------------------------------------------------------------------
        !            24: Type RECT
        !            25:     wleft As Integer
        !            26:     top As Integer
        !            27:     wright As Integer
        !            28:     bottom As Integer
        !            29: End Type
        !            30: 
        !            31: Type POINT
        !            32:     x As Integer
        !            33:     y As Integer
        !            34: End Type
        !            35: 
        !            36: Declare Function FindWindow          Lib "User32" ALIAS "FindWindowA" (lpClassName As Any, lpWindowName As Any) As Integer
        !            37: Declare Function GetActiveWindow     Lib "User32" ALIAS "GetActiveWindow" () As Integer
        !            38: Declare Sub      GetClientRect       Lib "User32" ALIAS "GetClientRect" (hWnd%, lpRect As RECT)
        !            39: Declare Function GetDesktopWindow    Lib "User32" ALIAS "GetDesktopWindow" () As Integer
        !            40: Declare Function GetFocus            Lib "User32" ALIAS "GetFocus" () As Integer
        !            41: Declare Function GetForegroundWindow Lib "User32" ALIAS "GetForegroundWindow" () As Integer
        !            42: Declare Function GetSystemMetrics    Lib "User32" ALIAS "GetSystemMetrics" (nIndex%) As Integer
        !            43: Declare Function GetWindowLong       Lib "User32" ALIAS "GetWindowLongA" (hWnd%,  nIndex%) As Long
        !            44: Declare Sub      GetWindowRect       Lib "User32" ALIAS "GetWindowRect" (hWnd%, lpRect As RECT)
        !            45: Declare Function GetWindowText       Lib "User32" ALIAS "GetWindowTextA" (hWnd%,  lpString$,  nMaxCount%) As Integer
        !            46: Declare Function IsZoomed            Lib "User32" ALIAS "IsZoomed" (hWnd%) As Integer
        !            47: Declare Function MessageBox          Lib "User32" ALIAS "MessageBoxA" (hWndParent%,  lpText$,  lpCaption$,  wType%) As Integer
        !            48: Declare Function SendMessage         Lib "User32" ALIAS "SendMessageA" (hWnd%,  wMsg%,  wParam%, lParam As Any) As Long
        !            49: Declare Function SetActiveWindow     Lib "User32" ALIAS "SetActiveWindow" (hWnd%) As Integer
        !            50: Declare Function SetFocus            Lib "User32" ALIAS "SetFocus" (hWnd%) As Integer
        !            51: Declare Function SetForegroundWindow Lib "User32" ALIAS "SetForegroundWindow" (hWnd%) As Integer
        !            52: Declare Function SetWindowPos        Lib "User32" ALIAS "SetWindowPos" (h%, ha%, x%, y%, cx%, cy%, f%) As Integer
        !            53: Declare Function ShowWindow          Lib "User32" ALIAS "ShowWindow" (hWnd%,  nCmdShow%) As Integer
        !            54: 
        !            55: 
        !            56: '  ShowWindow() Commands
        !            57: Const SW_HIDE = 0
        !            58: Const SW_SHOWNORMAL = 1
        !            59: Const SW_NORMAL = 1
        !            60: Const SW_SHOWMINIMIZED = 2
        !            61: Const SW_SHOWMAXIMIZED = 3
        !            62: Const SW_MAXIMIZE = 3
        !            63: Const SW_SHOWNOACTIVATE = 4
        !            64: Const SW_SHOW = 5
        !            65: Const SW_MINIMIZE = 6
        !            66: Const SW_SHOWMINNOACTIVE = 7
        !            67: Const SW_SHOWNA = 8
        !            68: Const SW_RESTORE = 9
        !            69: 
        !            70: '  Window Styles
        !            71: Const WS_MINIMIZE = &H20000000
        !            72: Const WS_MAXIMIZE = &H1000000
        !            73: 
        !            74: 
        !            75: '  Window field offsets for GetWindowLong()
        !            76: Const GWL_WNDPROC = (-4)
        !            77: Const GWL_STYLE = (-16)
        !            78: Const GWL_EXSTYLE = (-20)
        !            79: 
        !            80: '$endif
        !            81: 
        !            82: '$ifndef _WINKERN
        !            83: 
        !            84: ' Definitions stolen from WINKERN.INC
        !            85: '-----------------------------------------------------------------------------
        !            86: Declare Function WinExec           Lib "Kernel32" ALIAS "WinExec" (lpCmdLine$, nCmdShow%) As Integer
        !            87: 
        !            88: '$endif

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