home *** CD-ROM | disk | FTP | other *** search
- include "mmpstool.mnc"
-
- const SW_HIDE = 0
- const SW_SHOWNORMAL = 1
- const SW_NORMAL = 1
- const SW_SHOWMINIMIZED = 2
- const SW_SHOWMAXIMIZED = 3
- const SW_MAXIMIZE = 3
- const SW_SHOWNOACTIVATE = 4
- const SW_SHOW = 5
- const SW_MINIMIZE = 6
- const SW_SHOWMINNOACTIVE = 7
- const SW_SHOWNA = 8
- const SW_RESTORE = 9
-
- const HELP_CONTEXT = 1
- const HELP_QUIT = 2
- const HELP_INDEX = 3
- const HELP_CONTENTS = 3
- const HELP_HELPONHELP = 4
- const HELP_SETINDEX = 5
- const HELP_SETCONTENTS = 5
- const HELP_CONTEXTPOPUP = 8
- const HELP_FORCEFILE = 9
-
- # Comment #
-
- declare GetModuleHandle lib "kernel" (string) as integer
- declare MMWindow lib "mmlib.dll" alias "GetActiveFlipChartWindow" as integer
- declare GetFileCount lib "mmctrl.dll" (string) alias "_lexist" as integer
- declare MakeDir lib "mmctrl.dll" (string) alias "_lmkdir" as integer
- declare DeleteFile lib "mmctrl.dll" (string) alias "_lremove" as integer
- # RenameFile (<new name>, <old name>) #
- declare RenameFile lib "mmctrl.dll" (string, string) alias "_lrename" as integer
- declare GetShortName lib "mmctrl.dll" (string) alias "GetShortNameEx" as string
- declare CopyFile lib "mmctrl.dll" (string, string) as integer
- declare strrepl lib "mmctrl.dll" alias "lstrrep" (string, string, string) as integer
- declare ShowWindow lib "user" (integer, integer) as integer
- declare GetWindowText lib "user" (integer, string, integer) as integer
- declare SetWindowText lib "user" (integer, string) as integer
- declare GetParent lib "user" (integer) as integer
- declare LoadLibrary lib "kernel" (string) as integer
- declare FreeLibrary lib "kernel" (integer) as integer
- declare LoadString lib "user" (integer, integer, string, integer) as integer
- declare Ansi lib "keyboard.drv" (string, string, integer) alias "OEMtoAnsiBuff" as integer
- declare WinHelp lib "user" (integer, string, integer, long) as integer
- declare mciSendString lib "mmsystem" (string , string, integer, integer) as integer
-
- declare lstrspn lib "mmctrl.dll" (string, string) as integer
- declare JulianDate lib "mmlib.dll" alias "psYMDToDate" (integer, integer, integer) as long
- declare YMDFromJulian lib "mmlib.dll" alias "psDateToYMD" (long) as date
- declare GetTickCount lib "user.dll" as long
- declare fxUsedSize lib "mmctrl.dll" as long
-
- # VTFORM #
- Declare SSSetColWidth Lib "VTSSDLL.DLL" (long, integer, integer, integer, integer) as integer
- Declare SSSetBackColor Lib "VTSSDLL.DLL" (long, long) as integer
- Declare SSSetFont Lib "VTSSDLL.DLL" (long, string, integer, integer, integer, integer, integer, long, integer, integer) as integer
- Declare SSClearRange Lib "VTSSDLL.DLL" (long, integer, integer, integer, integer, integer) as integer
- Declare SSSetSelection Lib "VTSSDLL.DLL" (long, integer, integer, integer, integer) as integer
- Declare SSSetRowHeight Lib "VTSSDLL.DLL" (long, integer, integer, integer, integer) as integer
- Declare SSSetMaxRow Lib "VTSSDLL.DLL" (long, integer) as integer
- Declare SSSetFont Lib "VTSSDLL.DLL" (long, string, integer, integer, integer, integer, integer, long, integer, integer) as integer
-
-
-