Annotation of mstools/mstest/sample/imagedit.inc, revision 1.1

1.1     ! root        1: '******************************* MYOWN.INC    *********************************
        !             2: 'Required Files: MFUNCTS.MST, MSTEST.INC
        !             3: '
        !             4: '******************************************************************************
        !             5: 
        !             6: 
        !             7: '******************************************************************************
        !             8: ' DEFINES
        !             9: '******************************************************************************
        !            10: 
        !            11: '$DEFINE TESTSCRN
        !            12: '$DEFINE TESTCTRL
        !            13: '$DEFINE TESTEVNT
        !            14: 
        !            15: 
        !            16: 
        !            17: '$INCLUDE 'MSTEST.INC'
        !            18: 
        !            19: 'Prototypes from IMAGEF.MST
        !            20: Declare FUNCTION GetSystemMetrics LIB "USER32" (SM_INDEX) AS INTEGER
        !            21: Declare FUNCTION FindWindow LIB "USER32" ALIAS "FindWindowA"  (szClass$, szWindow$) AS INTEGER
        !            22: 
        !            23: Declare FUNCTION AttachThreadInput LIB "USER32" ALIAS "AttachThreadInput" (idAttach&, idAttachTo&, fAttach&) AS LONG
        !            24: Declare FUNCTION GetCurrentThreadId LIB "KERNEL32" ALIAS "GetCurrentThreadId" () AS LONG
        !            25: 
        !            26: Declare Function WinExec Lib "KERNEL32" ALIAS "WinExec" (lpCmdLine$, nCmdShow%) As Integer
        !            27: 
        !            28: 
        !            29: Declare SUB PlaceViewWindow(BoxSize$)
        !            30: Declare SUB PlaceToolBox(tx%,ty%)
        !            31: Declare SUB PlacePalette(px%,py%)
        !            32: Declare SUB ToolBoxShow(State$)
        !            33: Declare SUB PaletteShow(State$)
        !            34: Declare SUB ViewWindowShow(State$)
        !            35: Declare SUB GridShow(State$)
        !            36: Declare SUB SetBrushSize(Size$)
        !            37: Declare SUB ProcessResults( FileName$, SubName$, DumpIndex% )
        !            38: Declare SUB CreateGolden( FileName$, SubName$, DumpIndex% )
        !            39: Declare SUB Verify(FileName$, SubName$, DumpIndex%)
        !            40: Declare SUB ToolTest(Width$)
        !            41: Declare SUB IToolTest(Width$)
        !            42: Declare SUB Bitmap32x32x16init
        !            43: DECLARE SUB WaitWhileWnd (Title$)
        !            44: DECLARE SUB WaitForWnd (Title$)
        !            45: 
        !            46: '$INCLUDE 'IMAGEINC.MST'
        !            47: 
        !            48: 

unix.superglobalmegacorp.com

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