Annotation of mstools/mstest/sample/imagedit.inc, revision 1.1.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.