This repository has been archived by the owner on Mar 16, 2022. It is now read-only.
/
header.bi
115 lines (88 loc) · 3.35 KB
/
header.bi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
/'
header.bi
VGMPlayGUI v2 - Header file.
Copyright (c) 2018-2019 Kazusoft Co.
Kazusoft is a TradeMark of Lisa Murray.
'/
''preprocesser
#Pragma Once
''make sure target is Windows
#Ifndef __FB_WIN32__
#Error "This file is for Windows only."
#EndIf
#If __FB_OUT_EXE__
#Print "Compiling VGMPlayGUI."
#Else
#Error "__FB_OUT_EXE__ = 0"
#EndIf
#Ifdef __FB_64BIT__
#Print "Compiling for 64-bit Windows."
#Else
#Print "Compiling for 32-bit Windows."
#EndIf
#If __FB_DEBUG__
#Print "Compiling in debug mode."
#Else
#Print "Compiling in release mode."
#EndIf
''include header files
#Include Once "windows.bi"
#Include Once "win/shlwapi.bi"
#Include Once "win/commctrl.bi"
#Include Once "win/commdlg.bi"
#Include "inc/config.bi"
#Include "inc/playlist-editor.bi"
#Include "inc/createtooltip.bi"
#Include "inc/errorhandler.bi"
#Include "inc/heapptrlist.bi"
#Include "defines.bi"
''define constants
Const MainClass = "MAINCLASS"
''declare shared variables
Extern hInstance As HINSTANCE
''declare functions
''main function
Declare Function WinMain (ByVal hInst As HINSTANCE, ByVal hInstPrev As HINSTANCE, ByVal lpszCmdLine As LPSTR, ByVal nShowCmd As INT32) As INT32
Declare Function InitClasses () As BOOL
/' Used to start the main dialog. called by WinMain only, do not call this
function.
hWnd:HWND - Returns the handle to the main window.
nShowCmd:INT32 - Show command to use (passed from WinMain/nShowCmd).
lParam:LPARAM - Optional parameter to pass to DialogBoxParam.
'/
Declare Function StartMainDialog (ByVal hWnd As HWND, ByVal nShowCmd As INT32, ByVal lParam As LPARAM) As BOOL
''main dialog procedure
Declare Function MainProc (ByVal hWnd As HWND, ByVal uMsg As UINT32, ByVal wParam As WPARAM, ByVal lParam As LPARAM) As LRESULT
/' Creates child windows for the main dialog. This is called exclusivly by
MainProc, do not call this function otherwise.
'/
Declare Function CreateMainChildren (ByVal hDlg As HWND) As BOOL
/' Called by CreateMainChildren to create tooltips for the main dialog. This
is called exclusively by CreateMainChildren, do not call this
function otherwise.
'/
Declare Function CreateMainToolTips (ByVal hDlg As HWND) As BOOL
/' EnumChildWindows procedure for resizing the main dialog's child windows.
lParam is a pointer to a RECT containing the main window's size in
client co-ords.
'/
Declare Function ResizeMainChildren (ByVal hWnd As HWND, ByVal lParam As LPARAM) As BOOL
/' Displays a context menu in the main dialog. dwMouse holds the screen
coords of the mouse click in the following form:
Low order WORD = x
High order WORD = y
'/
Declare Function DisplayMainContextMenu (ByVal hDlg As HWND, ByVal dwMouse As DWORD32) As BOOL
/' Changes directories, updates the UI, and redraws the list boxes for the
main dialog. This function should only be called by MainProc, do not call
it otherwise.
'/
Declare Function PopulateLists (ByVal hDlg As HWND, ByVal lpszPath As LPCTSTR) As BOOL
/' Updates the main dialog's title bar.
lpszPath is the path to set, if this is NULL, the path part of the
title is removed.
'/
Declare Function UpdateMainTitleBar (ByVal hDlg As HWND, ByVal lpszPath As LPCTSTR) As BOOL
Declare Function StartVGMPlay (ByVal lpszFile As LPCTSTR) As BOOL
Declare Function AboutMsgBox (ByVal hDlg As HWND) As BOOL
''EOF