1080 lines
40 KiB
C
1080 lines
40 KiB
C
|
/*
|
||
|
|
* SETUP.C
|
||
|
|
*
|
||
|
|
* Copyright (C) 1990 Microsoft Corporation.
|
||
|
|
*
|
||
|
|
* Edit setups dialog box and support functions.
|
||
|
|
*/
|
||
|
|
/* Revision history:
|
||
|
|
March 92 Ported to 16/32 common code by Laurie Griffiths (LaurieGr)
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "preclude.h"
|
||
|
|
#include <windows.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <mmsystem.h>
|
||
|
|
#include <port1632.h>
|
||
|
|
#include "hack.h"
|
||
|
|
#include "midimap.h"
|
||
|
|
#include "midi.h"
|
||
|
|
#include <cphelp.h>
|
||
|
|
#include "extern.h"
|
||
|
|
#include "stdio.h"
|
||
|
|
#include "stdarg.h"
|
||
|
|
|
||
|
|
#if defined(WIN32)
|
||
|
|
#define _based(x)
|
||
|
|
#endif //WIN32
|
||
|
|
|
||
|
|
BOOL FAR PASCAL _loadds FSetupEnumPortsFunc(LPSTR, LPSTR, UINT, HWND, LPSTR);
|
||
|
|
|
||
|
|
#define PAL_SHOW 0 // show active line
|
||
|
|
#define PAL_HIDE 1 // hide active line
|
||
|
|
|
||
|
|
#define PSF_REDRAW 0x0001 // redraw where line used to be
|
||
|
|
#define PSF_SHOWIFHIDDEN 0x0002 // show line if hidden
|
||
|
|
|
||
|
|
#define BTN3S_UNCHECK 0 // uncheck a 3-state button
|
||
|
|
#define BTN3S_CHECK 1 // check a 3-state button
|
||
|
|
#define BTN3S_GRAY 2 // gray a 3-state button
|
||
|
|
|
||
|
|
#define DEF_SETUP_ROWS 16 // number of default setup rows
|
||
|
|
|
||
|
|
static HGLOBAL hSetup; // Setup handle
|
||
|
|
static HWND hPortList, // invalid port list box ctrl handle
|
||
|
|
hPortCombo, // port combo-box ctrl handle
|
||
|
|
hPatchCombo; // patch combo-box ctrl handle
|
||
|
|
static UINT nPorts; // number of ports available
|
||
|
|
static int nPatches, // number of user-defined patchmaps
|
||
|
|
iOldPos, // old position of active edit line
|
||
|
|
xArrowOffset; // arrow control positional offset
|
||
|
|
static SZCODE aszNull[] = "";
|
||
|
|
static SZCODE aszSetupNumFormat[] = "%3d";
|
||
|
|
|
||
|
|
#if DBG
|
||
|
|
void FAR cdecl dprintf(LPSTR szFormat, ...)
|
||
|
|
{
|
||
|
|
|
||
|
|
char ach[128];
|
||
|
|
va_list va;
|
||
|
|
int s,d;
|
||
|
|
|
||
|
|
va_start(va, szFormat);
|
||
|
|
s = vsprintf (ach, szFormat, va);
|
||
|
|
va_end(va);
|
||
|
|
#if 0
|
||
|
|
lstrcat(ach,"\n");
|
||
|
|
s++;
|
||
|
|
#endif
|
||
|
|
for (d=sizeof(ach)-1; s>=0; s--)
|
||
|
|
{
|
||
|
|
if ((ach[d--] = ach[s]) == '\n')
|
||
|
|
ach[d--] = '\r';
|
||
|
|
}
|
||
|
|
|
||
|
|
OutputDebugString("MIDI: ");
|
||
|
|
OutputDebugString(ach+d+1);
|
||
|
|
}
|
||
|
|
#else
|
||
|
|
#define dprintf if (0) ((int (*)(char *, ...)) 0)
|
||
|
|
#endif //DBG
|
||
|
|
|
||
|
|
static BOOL NEAR PASCAL FHasInvalidPort(
|
||
|
|
void)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
WORD wNumDevs;
|
||
|
|
int i;
|
||
|
|
|
||
|
|
wNumDevs = (WORD)midiOutGetNumDevs();
|
||
|
|
// dprintf("numDevs = %d\n", wNumDevs);
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
for (i = 0; i < 16; i++)
|
||
|
|
{ // dprintf("device id[%d]=%d\n",i,lpSetup->channels[i].wDeviceID);
|
||
|
|
if ((lpSetup->channels[i].wDeviceID != LOWORD(MIDI_MAPPER)) &&
|
||
|
|
(lpSetup->channels[i].wDeviceID >= wNumDevs))
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
return (i < 16);
|
||
|
|
} /* FHasInvalidPort */
|
||
|
|
|
||
|
|
static int PASCAL ISetupSave(
|
||
|
|
HWND hdlg,
|
||
|
|
BOOL bQuery)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
MMAPERR mmaperr;
|
||
|
|
int iRet = 0; // choose a value not IDCANCEL or IDYES
|
||
|
|
|
||
|
|
if (bQuery)
|
||
|
|
if ((iRet = QuerySave()) != IDYES)
|
||
|
|
return iRet;
|
||
|
|
if (FHasInvalidPort())
|
||
|
|
if (!InvalidPortMsgBox(hdlg))
|
||
|
|
return IDCANCEL;
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
mmaperr = mapWrite(MMAP_SETUP, lpSetup);
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
if (mmaperr != MMAPERR_SUCCESS) {
|
||
|
|
VShowError(hdlg, mmaperr);
|
||
|
|
return IDCANCEL;
|
||
|
|
}
|
||
|
|
Modify(FALSE);
|
||
|
|
if (fNew)
|
||
|
|
fNew = FALSE;
|
||
|
|
return iRet;
|
||
|
|
} /* ISetupSave */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupEditMsg
|
||
|
|
*
|
||
|
|
* This function deals with EN_UPDATE and EN_ACTIVATE messages sent
|
||
|
|
* to the channel number edit control through the WM_COMMAND message.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static void PASCAL VSetupEditMsg(
|
||
|
|
HWND hdlg,
|
||
|
|
WORD NotifCode)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
int i;
|
||
|
|
LPWORD lpwChan;
|
||
|
|
WORD wChan;
|
||
|
|
BOOL bTranslate;
|
||
|
|
|
||
|
|
switch (NotifCode) {
|
||
|
|
case EN_UPDATE:
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
lpwChan = &lpSetup->channels[iVertPos + iCurPos].wChannel;
|
||
|
|
i = GetDlgItemInt(hdlg, ID_SETUPEDIT, &bTranslate, FALSE);
|
||
|
|
if (i > 0 && i <= 16) {
|
||
|
|
if (*lpwChan != (BYTE)(i - 1)) {
|
||
|
|
*lpwChan = (BYTE)(i - 1);
|
||
|
|
Modify(TRUE);
|
||
|
|
}
|
||
|
|
} else {
|
||
|
|
char aszMessage[256];
|
||
|
|
char aszTitle[32];
|
||
|
|
|
||
|
|
// may want to experiment with EM_UNDO here.
|
||
|
|
LoadString(hLibInst, IDS_INVALIDDESTINATION, aszMessage, sizeof(aszMessage));
|
||
|
|
LoadString(hLibInst, IDS_USERERROR, aszTitle, sizeof(aszTitle));
|
||
|
|
MessageBox(hdlg, aszMessage, aszTitle, MB_ICONEXCLAMATION | MB_OK);
|
||
|
|
SetDlgItemInt(hdlg, ID_SETUPEDIT,
|
||
|
|
*lpwChan + 1, FALSE);
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
break;
|
||
|
|
case EN_ACTIVATE:
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
wChan = lpSetup->channels[iVertPos + iCurPos].wChannel;
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
SetDlgItemInt(hdlg, ID_SETUPEDIT, wChan + 1, FALSE);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} /* VSetupEditMsg */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupActiveChan
|
||
|
|
*
|
||
|
|
* This function controls the checked/unchecked/grayed state of the 'Active'
|
||
|
|
* button for a specific channel. If the function is being grayed, it will
|
||
|
|
* be disabled as well.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static void NEAR PASCAL VSetupActiveChan(
|
||
|
|
int iPos,
|
||
|
|
LPDWORD lpdwFlags,
|
||
|
|
UINT uCheck)
|
||
|
|
{
|
||
|
|
HWND hCheck;
|
||
|
|
BOOL fEnable;
|
||
|
|
|
||
|
|
if (lpdwFlags)
|
||
|
|
if (uCheck == BTN3S_CHECK)
|
||
|
|
*lpdwFlags |= MMAP_ACTIVE;
|
||
|
|
else
|
||
|
|
*lpdwFlags &= ~MMAP_ACTIVE;
|
||
|
|
hCheck = GetDlgItem(hWnd, ID_SETUPCHECK + iPos);
|
||
|
|
if ((UINT)SendMessage(hCheck, BM_GETCHECK, (WPARAM)0, (LPARAM)0) != uCheck)
|
||
|
|
SendMessage(hCheck, BM_SETCHECK, (WPARAM)uCheck, (LPARAM)0);
|
||
|
|
fEnable = (uCheck != BTN3S_GRAY);
|
||
|
|
if (fEnable != IsWindowEnabled(hCheck))
|
||
|
|
EnableWindow(hCheck, fEnable);
|
||
|
|
} /* VSetupActiveChan */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupComboMsg
|
||
|
|
*
|
||
|
|
* This function deals with the CBN_ACTIVATE and CBN_SELCHANGE messages sent
|
||
|
|
* to the port or patch combo boxes through the WM_COMMAND message.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static void NEAR PASCAL VSetupComboMsg(
|
||
|
|
HWND hdlg,
|
||
|
|
UINT id,
|
||
|
|
WORD NotifCode)
|
||
|
|
{
|
||
|
|
HWND hCombo = GetDlgItem(hdlg, id);
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
CHANNEL FAR* lpChannel;
|
||
|
|
UINT uIdx;
|
||
|
|
char szBuf[MAXPNAMELEN];
|
||
|
|
|
||
|
|
if (NotifCode != CBN_ACTIVATE && NotifCode != CBN_SELCHANGE)
|
||
|
|
return;
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
lpChannel = &lpSetup->channels[iVertPos + iCurPos];
|
||
|
|
switch (NotifCode) {
|
||
|
|
case CBN_ACTIVATE:
|
||
|
|
uIdx = MMAP_ID_NOPORT;
|
||
|
|
// if its a port combo box message
|
||
|
|
if (id == ID_SETUPPORTCOMBO)
|
||
|
|
if (lpChannel->wDeviceID != MMAP_ID_NOPORT)
|
||
|
|
uIdx = lpChannel->wDeviceID;
|
||
|
|
else
|
||
|
|
uIdx = nPorts;
|
||
|
|
// otherwise its a patch combo box message
|
||
|
|
else if (lpChannel->dFlags & MMAP_PATCHMAP)
|
||
|
|
uIdx = ComboLookup(hCombo, lpChannel->aszPatchName);
|
||
|
|
else
|
||
|
|
uIdx = nPatches;
|
||
|
|
SendMessage(hCombo, CB_SETCURSEL, (WPARAM)uIdx, (LPARAM)0);
|
||
|
|
break;
|
||
|
|
case CBN_SELCHANGE:
|
||
|
|
GetWindowText(hCombo, szBuf, MAXPNAMELEN);
|
||
|
|
// if we're dealing with a port combo message
|
||
|
|
if (id == ID_SETUPPORTCOMBO) {
|
||
|
|
// get the index of the newly selected port
|
||
|
|
uIdx = (UINT)SendMessage(hCombo,
|
||
|
|
CB_GETCURSEL, (WPARAM)NULL, (LPARAM)0);
|
||
|
|
// if it's the same as old index, we don't care
|
||
|
|
if (uIdx == lpChannel->wDeviceID)
|
||
|
|
break;
|
||
|
|
// if it's the last port index, it's the[none] entry
|
||
|
|
if (uIdx == (UINT)nPorts) {
|
||
|
|
// set id to bogus port value
|
||
|
|
lpChannel->wDeviceID = MMAP_ID_NOPORT;
|
||
|
|
// deactivate the channel
|
||
|
|
VSetupActiveChan(iCurPos, &lpChannel->dFlags,
|
||
|
|
BTN3S_GRAY);
|
||
|
|
} else {
|
||
|
|
// ok so it's not the[none] entry
|
||
|
|
// if it used to be[none], activate channel
|
||
|
|
if (lpChannel->wDeviceID == MMAP_ID_NOPORT)
|
||
|
|
VSetupActiveChan(iCurPos,
|
||
|
|
&lpChannel->dFlags,
|
||
|
|
BTN3S_CHECK);
|
||
|
|
// set the id to the new index
|
||
|
|
lpChannel->wDeviceID = (WORD)uIdx;
|
||
|
|
}
|
||
|
|
Modify(TRUE);
|
||
|
|
} else {
|
||
|
|
if (!lstrcmpi(szBuf, lpChannel->aszPatchName))
|
||
|
|
break;
|
||
|
|
lstrcpy(lpChannel->aszPatchName, szBuf);
|
||
|
|
if (!lstrcmpi(szBuf, szNone))
|
||
|
|
lpChannel->dFlags &= ~MMAP_PATCHMAP;
|
||
|
|
else
|
||
|
|
lpChannel->dFlags |= MMAP_PATCHMAP;
|
||
|
|
Modify(TRUE);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
} /* VSetupComboMsg */
|
||
|
|
|
||
|
|
static void NEAR PASCAL VSetupActiveLine(
|
||
|
|
UINT uCase,
|
||
|
|
UINT uFlags)
|
||
|
|
{
|
||
|
|
static const UINT uDefFlags = SWP_NOMOVE | SWP_NOSIZE | SWP_NOZORDER;
|
||
|
|
|
||
|
|
switch (uCase) {
|
||
|
|
case PAL_SHOW:
|
||
|
|
if (!fHidden)
|
||
|
|
return;
|
||
|
|
uFlags |= SWP_SHOWWINDOW;
|
||
|
|
fHidden = FALSE;
|
||
|
|
break;
|
||
|
|
case PAL_HIDE:
|
||
|
|
if (fHidden)
|
||
|
|
return;
|
||
|
|
uFlags |= SWP_HIDEWINDOW;
|
||
|
|
fHidden = TRUE;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
uFlags |= uDefFlags;
|
||
|
|
SetWindowPos(hEdit, NULL, 0L, 0L, 0L, 0L, uFlags);
|
||
|
|
SetWindowPos(hArrow, NULL, 0L, 0L, 0L, 0L, uFlags);
|
||
|
|
SetWindowPos(hPortCombo, NULL, 0L, 0L, 0L, 0L, uFlags);
|
||
|
|
SetWindowPos(hPatchCombo, NULL, 0L, 0L, 0L, 0L, uFlags);
|
||
|
|
if (uCase == PAL_SHOW)
|
||
|
|
SetFocus(hEdit);
|
||
|
|
} /* VSetupActiveLine */
|
||
|
|
|
||
|
|
static void NEAR PASCAL VSetupSetFocus(
|
||
|
|
HWND hdlg,
|
||
|
|
UINT uFlags,
|
||
|
|
int xPos)
|
||
|
|
{
|
||
|
|
HWND hOldCheck;
|
||
|
|
HWND hNewCheck;
|
||
|
|
RECT rc;
|
||
|
|
DWORD dwFlags;
|
||
|
|
int yPos = rcBox.top + iCurPos * yChar;
|
||
|
|
|
||
|
|
// change tabstop flag on new checkbox
|
||
|
|
hNewCheck = GetDlgItem(hdlg, ID_SETUPCHECK + iCurPos);
|
||
|
|
dwFlags = (DWORD)GetWindowLong(hNewCheck, GWL_STYLE);
|
||
|
|
dwFlags |= WS_TABSTOP;
|
||
|
|
SetWindowLong(hNewCheck, GWL_STYLE, dwFlags);
|
||
|
|
// set mnemonic on new window
|
||
|
|
SetWindowText(hNewCheck, aszSourceMnumonic);
|
||
|
|
// take the tabstop away from the old checkbox if it exists
|
||
|
|
if (iOldPos > -1) {
|
||
|
|
hOldCheck = GetDlgItem(hdlg, ID_SETUPCHECK + iOldPos);
|
||
|
|
dwFlags = (DWORD)GetWindowLong(hOldCheck, GWL_STYLE);
|
||
|
|
dwFlags &= ~(DWORD)WS_TABSTOP;
|
||
|
|
SetWindowLong(hOldCheck, GWL_STYLE, dwFlags);
|
||
|
|
// take away mnemonic from old window
|
||
|
|
SetWindowText(hOldCheck, aszNull);
|
||
|
|
}
|
||
|
|
iOldPos = iCurPos;
|
||
|
|
GetWindowRect(hEdit, &rc);
|
||
|
|
SetWindowPos(hEdit, NULL, rgxPos[1], yPos, 0L, 0L,
|
||
|
|
SWP_NOZORDER | SWP_NOSIZE);
|
||
|
|
VSetupEditMsg(hdlg, EN_ACTIVATE);
|
||
|
|
// UpdateWindow(hEdit);
|
||
|
|
SetWindowPos(hArrow, NULL, rgxPos[1] + xArrowOffset, yPos, 0L,
|
||
|
|
0L, SWP_NOZORDER | SWP_NOSIZE);
|
||
|
|
SetWindowPos(hPortCombo, NULL, rgxPos[2], yPos, 0L, 0L,
|
||
|
|
SWP_NOZORDER | SWP_NOSIZE);
|
||
|
|
VSetupComboMsg(hdlg, ID_SETUPPORTCOMBO, CBN_ACTIVATE);
|
||
|
|
SetWindowPos(hPatchCombo, NULL, rgxPos[3], yPos, 0L, 0L,
|
||
|
|
SWP_NOZORDER | SWP_NOSIZE);
|
||
|
|
VSetupComboMsg(hdlg, ID_SETUPPATCHCOMBO, CBN_ACTIVATE);
|
||
|
|
if ((fHidden) && (uFlags & PSF_SHOWIFHIDDEN)) {
|
||
|
|
VSetupActiveLine(PAL_SHOW, 0L);
|
||
|
|
UpdateWindow(hArrow);
|
||
|
|
UpdateWindow(hPortCombo);
|
||
|
|
UpdateWindow(hPatchCombo);
|
||
|
|
}
|
||
|
|
// ValidateRect(hdlg, NULL);
|
||
|
|
if (uFlags & PSF_REDRAW && rc.right) {
|
||
|
|
ScreenToClient(hdlg, (LPPOINT)&rc);
|
||
|
|
ScreenToClient(hdlg, (LPPOINT)&rc + 1);
|
||
|
|
rc.right = rcBox.right + 1;
|
||
|
|
InvalidateRect(hdlg, &rc, FALSE);
|
||
|
|
UpdateWindow(hdlg);
|
||
|
|
}
|
||
|
|
if (!xPos)
|
||
|
|
return;
|
||
|
|
if (xPos < rgxPos[2]) {
|
||
|
|
SetFocus(hEdit);
|
||
|
|
#if defined(WIN16)
|
||
|
|
SendMessage(hEdit, EM_SETSEL, (WPARAM)NULL, MAKELPARAM(0, 32767));
|
||
|
|
#else
|
||
|
|
SendMessage(hEdit, EM_SETSEL, (WPARAM)0, (LPARAM)-1);
|
||
|
|
#endif //WIN16
|
||
|
|
} else if (xPos < rgxPos[3])
|
||
|
|
SetFocus(hPortCombo);
|
||
|
|
else if (xPos < rgxPos[4])
|
||
|
|
SetFocus(hPatchCombo);
|
||
|
|
} /* VSetupSetFocus */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupSize
|
||
|
|
*/
|
||
|
|
static
|
||
|
|
void PASCAL VSetupSize(
|
||
|
|
HWND hdlg,
|
||
|
|
BOOL fMaximize)
|
||
|
|
{
|
||
|
|
RECT rcOK;
|
||
|
|
RECT rc3S;
|
||
|
|
RECT rcWnd;
|
||
|
|
LONG lDBU;
|
||
|
|
UINT xBU;
|
||
|
|
UINT yBU;
|
||
|
|
int xButton;
|
||
|
|
int xCenter;
|
||
|
|
int yTopMar;
|
||
|
|
int yBotMar;
|
||
|
|
int yLeftOver;
|
||
|
|
int yMiniBotMar;
|
||
|
|
int i;
|
||
|
|
|
||
|
|
lDBU = GetDialogBaseUnits();
|
||
|
|
xBU = LOWORD(lDBU);
|
||
|
|
yBU = HIWORD(lDBU);
|
||
|
|
// get the rectangle of the OK button
|
||
|
|
GetClientRect(GetDlgItem(hdlg, IDOK), &rcOK);
|
||
|
|
// get x-extent of button
|
||
|
|
xButton = rcOK.right - rcOK.left;
|
||
|
|
// top margin is 2 characters
|
||
|
|
yTopMar = (16 * yBU) / 8 - 6; // cookie land
|
||
|
|
// bottom margin is 2 * minimum bottom margin dialog units +
|
||
|
|
// height of button in pixels
|
||
|
|
yBotMar = (VERTMARGIN * 2 *yBU) / 8 + rcOK.bottom - rcOK.top;
|
||
|
|
if (fMaximize) {
|
||
|
|
// get the rectangle of a 3-state button
|
||
|
|
GetClientRect(GetDlgItem(hdlg, ID_SETUPCHECK), &rc3S);
|
||
|
|
SetWindowPos(hdlg, NULL, 0L, 0L,
|
||
|
|
rcBox.right - rcBox.left +
|
||
|
|
(rc3S.right - rc3S.left) +
|
||
|
|
(HORZMARGIN * 3 * xBU) / 4 +
|
||
|
|
(GetSystemMetrics(SM_CXDLGFRAME) + 1) * 2,
|
||
|
|
(DEF_SETUP_ROWS * 10 * yBU) / 8 +
|
||
|
|
yTopMar + yBotMar +
|
||
|
|
GetSystemMetrics(SM_CYCAPTION) +
|
||
|
|
(GetSystemMetrics(SM_CYDLGFRAME) + 1) * 2,
|
||
|
|
SWP_NOZORDER | SWP_NOMOVE);
|
||
|
|
}
|
||
|
|
// get the x and y extents of the client rectangle
|
||
|
|
GetClientRect(hdlg, &rcWnd);
|
||
|
|
xClient = rcWnd.right - rcWnd.left;
|
||
|
|
yClient = rcWnd.bottom - rcWnd.top;
|
||
|
|
// yChar is the height of one row in pixels - 1
|
||
|
|
yChar = (10 * yBU) / 8 - 1;
|
||
|
|
// xChar is the average width of a character
|
||
|
|
xChar = xBU;
|
||
|
|
// yBox is the room we actually have to display setup rows
|
||
|
|
yBox = yClient - yTopMar - yBotMar;
|
||
|
|
// nLines is the number of setup rows we can display
|
||
|
|
nLines = min(16, yBox / yChar);
|
||
|
|
// yLeftOver is how many pixels are left over
|
||
|
|
yLeftOver = yBox - nLines * yChar;
|
||
|
|
// add half the leftovers to the top margin
|
||
|
|
yTopMar += yLeftOver / 2;
|
||
|
|
// calculate scroll bar maximum and position
|
||
|
|
iVertMax = max(0, 16 - nLines);
|
||
|
|
iVertPos = min(iVertMax, iVertPos);
|
||
|
|
// rcBox is the box of rows and columns inside the client area
|
||
|
|
SetRect(&rcBox,
|
||
|
|
rcBox.left,
|
||
|
|
yTopMar,
|
||
|
|
rcBox.right,
|
||
|
|
yTopMar + nLines * yChar);
|
||
|
|
// xCenter is used to center the OK and CANCEL buttons horizontally
|
||
|
|
xCenter = (rcBox.right - rcBox.left - xButton * 3) / 4;
|
||
|
|
// yMiniBotMar is the spacing above and below the button
|
||
|
|
yMiniBotMar = (VERTMARGIN * yBU) / 8 + yLeftOver / 4;
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, IDOK), NULL, rcBox.left + xCenter,
|
||
|
|
rcBox.bottom + yMiniBotMar, 0L, 0L,
|
||
|
|
SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, IDCANCEL), NULL,
|
||
|
|
rcBox.left + xButton + xCenter * 2,
|
||
|
|
rcBox.bottom + yMiniBotMar, 0L, 0L,
|
||
|
|
SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, IDH_DLG_MIDI_SETUPEDIT), NULL,
|
||
|
|
rcBox.left + xButton * 2 + xCenter * 3,
|
||
|
|
rcBox.bottom + yMiniBotMar, 0L, 0L,
|
||
|
|
SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
// this loop could be optimized
|
||
|
|
// then again, so could the u.s. judicial system
|
||
|
|
for (i = 0; i < 16; i++, yTopMar += yChar) {
|
||
|
|
HWND hCheck;
|
||
|
|
|
||
|
|
hCheck = GetDlgItem(hdlg, ID_SETUPCHECK + i);
|
||
|
|
if (i < nLines) {
|
||
|
|
SetWindowPos(hCheck, NULL,
|
||
|
|
rcBox.right + (HORZMARGIN * xBU) / 4,
|
||
|
|
yTopMar + 3, 0L, 0L,
|
||
|
|
SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
ShowWindow(hCheck, SW_SHOWNORMAL);
|
||
|
|
} else
|
||
|
|
ShowWindow(hCheck, SW_HIDE);
|
||
|
|
}
|
||
|
|
if (iCurPos >= 0 && iCurPos < nLines)
|
||
|
|
VSetupSetFocus(hdlg, PSF_SHOWIFHIDDEN, 1);
|
||
|
|
else
|
||
|
|
VSetupActiveLine(PAL_HIDE, SWP_NOREDRAW);
|
||
|
|
} /* VSetupSize */
|
||
|
|
|
||
|
|
static MMAPERR PASCAL MmaperrInitNew(void)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
WORD wChan;
|
||
|
|
|
||
|
|
if ((hSetup = GlobalAlloc(GHND, (DWORD)sizeof(SETUP))) == NULL)
|
||
|
|
return MMAPERR_MEMORY;
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
lstrcpy(lpSetup->aszSetupName, szCurrent);
|
||
|
|
lstrcpy(lpSetup->aszSetupDescription, szCurDesc);
|
||
|
|
for (wChan = 0; wChan < 16; wChan++) {
|
||
|
|
lpSetup->channels[wChan].wChannel = wChan;
|
||
|
|
lpSetup->channels[wChan].wDeviceID = MMAP_ID_NOPORT;
|
||
|
|
lstrcpy(lpSetup->channels[wChan].aszPatchName, szNone);
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
return MMAPERR_SUCCESS;
|
||
|
|
} /* MmaperrInitNew */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupEnumPorts
|
||
|
|
*
|
||
|
|
* Enumerate available port names and throw them in a combo box.
|
||
|
|
*/
|
||
|
|
|
||
|
|
static void PASCAL VSetupEnumPorts(
|
||
|
|
void)
|
||
|
|
{
|
||
|
|
MIDIOUTCAPS moCaps;
|
||
|
|
UINT i;
|
||
|
|
|
||
|
|
nPorts = midiOutGetNumDevs();
|
||
|
|
for (i = 0; i < nPorts; i++) {
|
||
|
|
midiOutGetDevCaps(i, &moCaps, sizeof(MIDIOUTCAPS));
|
||
|
|
SendMessage(hPortCombo, CB_ADDSTRING, (WPARAM)NULL,
|
||
|
|
(LPARAM)(LPSTR)moCaps.szPname);
|
||
|
|
}
|
||
|
|
} /* VSetupEnumPorts */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* MmaperrEnumPatches
|
||
|
|
*
|
||
|
|
* This function calls mapEnumerate to enumerate all the user-defined
|
||
|
|
* patchmaps into a combo box.
|
||
|
|
*/
|
||
|
|
static MMAPERR NEAR PASCAL MmaperrEnumPatches(void)
|
||
|
|
{
|
||
|
|
MMAPERR mmaperr;
|
||
|
|
|
||
|
|
mmaperr = mapEnumerate(MMAP_PATCH, EnumFunc, MMENUM_BASIC, hPatchCombo, NULL);
|
||
|
|
if (mmaperr != MMAPERR_SUCCESS)
|
||
|
|
return mmaperr;
|
||
|
|
nPatches = (int)(LONG)SendMessage(hPatchCombo, CB_GETCOUNT, (WPARAM)NULL, (LPARAM)0);
|
||
|
|
SendMessage(hPatchCombo, CB_ADDSTRING, (WPARAM)NULL, (LPARAM)(LPSTR)szNone);
|
||
|
|
return MMAPERR_SUCCESS;
|
||
|
|
} /* MmaperrEnumPatches */
|
||
|
|
|
||
|
|
static BOOL NEAR PASCAL FInitSetup(
|
||
|
|
HWND hdlg)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
LONG lDBU;
|
||
|
|
UINT xBU;
|
||
|
|
UINT yBU;
|
||
|
|
UINT xWidth; // width of current column
|
||
|
|
UINT xEdit; // width of edit controls
|
||
|
|
UINT yEdit; // height of edit/arrow controls
|
||
|
|
UINT xCombo; // width of combo boxes
|
||
|
|
UINT yCombo; // height of combo boxes
|
||
|
|
UINT wCheck;
|
||
|
|
char szCaption[80];
|
||
|
|
char szCaptionFormat[80];
|
||
|
|
MMAPERR mmaperr;
|
||
|
|
int i;
|
||
|
|
|
||
|
|
if (!fNew) {
|
||
|
|
if ((hSetup = GlobalAlloc(GHND, sizeof(SETUP))) == NULL) {
|
||
|
|
mmaperr = MMAPERR_MEMORY;
|
||
|
|
exit00: VShowError(hdlg, mmaperr);
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
} else if ((mmaperr = MmaperrInitNew()) != MMAPERR_SUCCESS)
|
||
|
|
goto exit00;
|
||
|
|
fHidden = FALSE;
|
||
|
|
iVertPos = 0;
|
||
|
|
iCurPos = 0;
|
||
|
|
nLines = 0; // necessary?
|
||
|
|
nPatches = 0;
|
||
|
|
nPorts = 0;
|
||
|
|
hPortList = GetDlgItem(hdlg, ID_SETUPPORTLIST);
|
||
|
|
hEdit = GetDlgItem(hdlg, ID_SETUPEDIT);
|
||
|
|
hArrow = GetDlgItem(hdlg, ID_SETUPARROW);
|
||
|
|
hPortCombo = GetDlgItem(hdlg, ID_SETUPPORTCOMBO);
|
||
|
|
hPatchCombo = GetDlgItem(hdlg, ID_SETUPPATCHCOMBO);
|
||
|
|
if (fReadOnly)
|
||
|
|
{
|
||
|
|
EnableWindow(GetDlgItem(hdlg,IDOK),FALSE);
|
||
|
|
SendMessage(hdlg, DM_SETDEFID, (WPARAM)IDCANCEL, (LPARAM)0);
|
||
|
|
}
|
||
|
|
lDBU = GetDialogBaseUnits();
|
||
|
|
xBU = LOWORD(lDBU);
|
||
|
|
yBU = HIWORD(lDBU);
|
||
|
|
xEdit = (40 * xBU) / 4; // 10 chars wide
|
||
|
|
yEdit = (10 * yBU) / 8; // 10 is a magic cookie
|
||
|
|
xCombo = (64 * xBU) / 4; // 16 characters long
|
||
|
|
yCombo = (46 * yBU) / 8; // 46 is a magic cookie
|
||
|
|
rcBox.left = (HORZMARGIN * xBU) / 4;
|
||
|
|
rcBox.right = rcBox.left;
|
||
|
|
rgxPos[0] = rcBox.right;
|
||
|
|
rcBox.right += xEdit;
|
||
|
|
rgxPos[1] = rcBox.right;
|
||
|
|
xWidth = xEdit;
|
||
|
|
SetWindowPos(hEdit, NULL, 0L, 0L, xWidth, yEdit,
|
||
|
|
SWP_NOZORDER | SWP_NOMOVE);
|
||
|
|
// set global arrow control offset to proper position
|
||
|
|
rcBox.right += xArrowOffset = xWidth - 1;
|
||
|
|
// width of dst channel arrow control
|
||
|
|
xWidth = (10 * xBU) / 4;
|
||
|
|
SetWindowPos(hArrow, NULL, 0L, 0L, xWidth, yEdit,
|
||
|
|
SWP_NOZORDER | SWP_NOMOVE);
|
||
|
|
rcBox.right += xWidth - 1;
|
||
|
|
rgxPos[2] = rcBox.right;
|
||
|
|
xWidth = (80 * xBU) / 4; // 20 characters long
|
||
|
|
SetWindowPos(hPortCombo, NULL, 0L, 0L, xWidth,
|
||
|
|
yCombo, SWP_NOZORDER | SWP_NOMOVE);
|
||
|
|
rcBox.right += xWidth - 1;
|
||
|
|
rgxPos[3] = rcBox.right;
|
||
|
|
xWidth = xCombo;
|
||
|
|
SetWindowPos(hPatchCombo, NULL, 0L, 0L, xWidth,
|
||
|
|
yCombo, SWP_NOZORDER | SWP_NOMOVE);
|
||
|
|
rcBox.right += xWidth - 1;
|
||
|
|
rgxPos[4] = rcBox.right;
|
||
|
|
if (!nPorts)
|
||
|
|
VSetupEnumPorts();
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
if (!nPatches)
|
||
|
|
if ((mmaperr = MmaperrEnumPatches()) != MMAPERR_SUCCESS) {
|
||
|
|
exit01: GlobalUnlock(hSetup);
|
||
|
|
GlobalFree(hSetup);
|
||
|
|
goto exit00;
|
||
|
|
}
|
||
|
|
if (!fNew) {
|
||
|
|
mmaperr = mapReadSetup(szCurrent, lpSetup);
|
||
|
|
if (mmaperr == MMAPERR_INVALIDPORT) {
|
||
|
|
if (!InvalidPortMsgBox(hdlg)) {
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
GlobalFree(hSetup);
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
mmaperr = mapEnumerate( MMAP_PORTS
|
||
|
|
, FSetupEnumPortsFunc
|
||
|
|
, MMENUM_BASIC
|
||
|
|
, NULL
|
||
|
|
, (LPSTR)szCurrent
|
||
|
|
);
|
||
|
|
}
|
||
|
|
if (mmaperr != MMAPERR_SUCCESS){
|
||
|
|
goto exit01;
|
||
|
|
}
|
||
|
|
if (lstrcmp(lpSetup->aszSetupDescription, szCurDesc)) {
|
||
|
|
lstrcpy(lpSetup->aszSetupDescription, szCurDesc);
|
||
|
|
fNew = TRUE;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
SendMessage(hPortCombo, CB_ADDSTRING, (WPARAM)NULL, (LPARAM)(LPSTR)szNone);
|
||
|
|
for (i = 0; i < 16; i++) {
|
||
|
|
// check a 3-state button if the channel is active, or gray
|
||
|
|
// it if the channel is not mapped to a port
|
||
|
|
if (lpSetup->channels[i].wDeviceID == MMAP_ID_NOPORT)
|
||
|
|
wCheck = BTN3S_GRAY;
|
||
|
|
else if (lpSetup->channels[i].dFlags & MMAP_ACTIVE)
|
||
|
|
wCheck = BTN3S_CHECK;
|
||
|
|
else
|
||
|
|
continue;
|
||
|
|
VSetupActiveChan(i, 0L, wCheck);
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
|
||
|
|
LoadString(hLibInst, IDS_SETUPS ,szCaptionFormat, sizeof(szCaptionFormat));
|
||
|
|
wsprintf(szCaption, szCaptionFormat, (LPSTR)szCurrent);
|
||
|
|
SetWindowText(hWnd, szCaption);
|
||
|
|
|
||
|
|
SendMessage(GetDlgItem(hdlg, ID_SETUPDESTMNEM),
|
||
|
|
WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
|
||
|
|
SendMessage(GetDlgItem(hdlg, ID_SETUPPORTMNEM),
|
||
|
|
WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
|
||
|
|
SendMessage(GetDlgItem(hdlg, ID_SETUPPATCHMNEM),
|
||
|
|
WM_SETFONT, (WPARAM)hFont, (LPARAM)0);
|
||
|
|
VSetupSize(hdlg, TRUE);
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, ID_SETUPDESTMNEM), NULL,
|
||
|
|
rgxPos[1], yChar, 0L, 0L, SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, ID_SETUPPORTMNEM), NULL,
|
||
|
|
rgxPos[2], yChar, 0L, 0L, SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
SetWindowPos(GetDlgItem(hdlg, ID_SETUPPATCHMNEM), NULL,
|
||
|
|
rgxPos[3], yChar, 0L, 0L, SWP_NOSIZE | SWP_NOZORDER);
|
||
|
|
Modify(fNew);
|
||
|
|
return TRUE;
|
||
|
|
} /* FInitSetup */
|
||
|
|
|
||
|
|
static void PASCAL VSetupButtonDown(
|
||
|
|
HWND hdlg,
|
||
|
|
LONG lParam)
|
||
|
|
{
|
||
|
|
int x = LOWORD(lParam);
|
||
|
|
int y = HIWORD(lParam);
|
||
|
|
int iPos;
|
||
|
|
UINT uFlags;
|
||
|
|
|
||
|
|
if (x < rcBox.left || x > rcBox.right)
|
||
|
|
return;
|
||
|
|
if (y < rcBox.top || y > rcBox.bottom)
|
||
|
|
return;
|
||
|
|
if ((iPos = min(nLines - 1, (y - rcBox.top) / yChar)) == iCurPos)
|
||
|
|
return;
|
||
|
|
if (iCurPos >= 0 && iCurPos < nLines) {
|
||
|
|
uFlags = PSF_REDRAW;
|
||
|
|
SendMessage(hPortCombo, CB_SHOWDROPDOWN, (WPARAM)FALSE, (LPARAM)0);
|
||
|
|
SendMessage(hPatchCombo, CB_SHOWDROPDOWN, (WPARAM)FALSE, (LPARAM)0);
|
||
|
|
UpdateWindow(hdlg);
|
||
|
|
} else
|
||
|
|
uFlags = PSF_SHOWIFHIDDEN;
|
||
|
|
iCurPos = iPos;
|
||
|
|
VSetupSetFocus(hdlg, uFlags, x);
|
||
|
|
} /* VSetupButtonDown */
|
||
|
|
|
||
|
|
static void PASCAL VSetupPaint(
|
||
|
|
HWND hdlg)
|
||
|
|
{
|
||
|
|
HPEN hPen; // previous pen to restore
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
CHANNEL FAR* lpChannel;
|
||
|
|
PAINTSTRUCT ps; // from BeginPaint
|
||
|
|
RECT rcText;
|
||
|
|
UINT uDev;
|
||
|
|
int i; // loop counter
|
||
|
|
int iVert;
|
||
|
|
int nBegin; // first row to repaint
|
||
|
|
int nEnd; // last row to repaint
|
||
|
|
int iLeft; // left of invalid area
|
||
|
|
int iTop; // top of invalid area
|
||
|
|
int iBottom; // bottom of invalid area
|
||
|
|
char szBuf[MAXPNAMELEN];
|
||
|
|
// uses GLOBAL hFont - Lord knows why.
|
||
|
|
// uses GLOBAL rcBox = clipping rectangle???
|
||
|
|
|
||
|
|
BeginPaint(hdlg, &ps);
|
||
|
|
if (!ps.rcPaint.bottom) { // bottom==0 => area must be empty
|
||
|
|
exit00: EndPaint(hdlg, &ps);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
hPen = SelectObject(ps.hdc, GetStockObject(BLACK_PEN));
|
||
|
|
hFont = SelectObject(ps.hdc, hFont);
|
||
|
|
SetTextColor(ps.hdc, GetSysColor(COLOR_WINDOWTEXT));
|
||
|
|
SetBkMode(ps.hdc, TRANSPARENT);
|
||
|
|
if (ps.rcPaint.top < rcBox.top) { // need to paint top headings?
|
||
|
|
iVert = yChar;
|
||
|
|
TextOut(ps.hdc, 11, iVert, aszSourceChannel, lstrlen(aszSourceChannel));
|
||
|
|
SetRect(&rcText, rcBox.right + 2, yChar, 0, 0);
|
||
|
|
DrawText(ps.hdc, aszActive, -1, &rcText,
|
||
|
|
DT_LEFT | DT_NOCLIP);
|
||
|
|
}
|
||
|
|
// calculate top and bottom y coordinates of invalid area
|
||
|
|
iTop = max(ps.rcPaint.top, rcBox.top);
|
||
|
|
// if top is below the box, forget about painting
|
||
|
|
if (iTop > rcBox.bottom) {
|
||
|
|
exit01: hFont = SelectObject(ps.hdc, hFont); // restore
|
||
|
|
hPen = SelectObject(ps.hdc, hPen); // restore
|
||
|
|
goto exit00;
|
||
|
|
}
|
||
|
|
iBottom = min(ps.rcPaint.bottom, rcBox.bottom);
|
||
|
|
// calculate left x coordinate of invalid area
|
||
|
|
iLeft = max(ps.rcPaint.left, rcBox.left);
|
||
|
|
// calculate beginning and ending data row to be repainted
|
||
|
|
nBegin = max(0, (iTop - rcBox.top) / yChar);
|
||
|
|
nEnd = min(nLines, (iBottom - rcBox.top) / yChar);
|
||
|
|
// draw vertical lines of the box
|
||
|
|
for (i = 0; i < 5; i++) {
|
||
|
|
MMoveTo(ps.hdc, rgxPos[i], iTop);
|
||
|
|
LineTo(ps.hdc, rgxPos[i], iBottom + 1);
|
||
|
|
}
|
||
|
|
// vertical position of first line we have to draw
|
||
|
|
iVert = rcBox.top + nBegin * yChar;
|
||
|
|
// lock the map
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
// set up an optimization pointer
|
||
|
|
lpChannel = &lpSetup->channels[iVertPos + nBegin];
|
||
|
|
for (i = nBegin; i <= nEnd; i++, iVert += yChar, lpChannel++) {
|
||
|
|
MMoveTo(ps.hdc, iLeft, iVert);
|
||
|
|
LineTo(ps.hdc, rcBox.right, iVert);
|
||
|
|
if (i == nLines)
|
||
|
|
break;
|
||
|
|
if (iLeft < rgxPos[1]) {
|
||
|
|
wsprintf(szBuf, aszSetupNumFormat, iVertPos + i + 1);
|
||
|
|
TextOut(ps.hdc, rgxPos[0] + xChar, iVert + 2,
|
||
|
|
szBuf, 3);
|
||
|
|
}
|
||
|
|
if (iLeft < rgxPos[2]) {
|
||
|
|
wsprintf(szBuf, aszSetupNumFormat, lpChannel->wChannel + 1);
|
||
|
|
TextOut(ps.hdc, rgxPos[1] + 2 * xChar, iVert + 2,
|
||
|
|
szBuf, 3);
|
||
|
|
}
|
||
|
|
if (i == iCurPos)
|
||
|
|
continue;
|
||
|
|
if (iLeft < rgxPos[3]) {
|
||
|
|
*szBuf = 0;
|
||
|
|
uDev = lpChannel->wDeviceID;
|
||
|
|
if (uDev == MMAP_ID_NOPORT)
|
||
|
|
uDev = nPorts;
|
||
|
|
if (uDev <= nPorts) {
|
||
|
|
RECT sTextRect;
|
||
|
|
TEXTMETRIC sTM;
|
||
|
|
|
||
|
|
SendMessage(hPortCombo, CB_GETLBTEXT,
|
||
|
|
uDev, (LPARAM)(LPSTR)szBuf);
|
||
|
|
|
||
|
|
GetTextMetrics(ps.hdc,(LPTEXTMETRIC)&sTM);
|
||
|
|
SetRect((LPRECT)&sTextRect,rgxPos[2]+2,iVert+2,rgxPos[3]-2,iVert+2+sTM.tmHeight);
|
||
|
|
DrawText(ps.hdc, szBuf, -1,(LPRECT)&sTextRect ,DT_NOPREFIX|DT_LEFT|DT_SINGLELINE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
if (iLeft < rgxPos[4]) {
|
||
|
|
RECT rc;
|
||
|
|
SetRect(&rc, rgxPos[3]+2, iVert, rgxPos[4]-2, iVert+yChar);
|
||
|
|
DrawText(ps.hdc,
|
||
|
|
lpChannel->aszPatchName,
|
||
|
|
lstrlen(lpChannel->aszPatchName),
|
||
|
|
&rc,
|
||
|
|
DT_LEFT|DT_SINGLELINE|DT_VCENTER
|
||
|
|
);
|
||
|
|
// was:
|
||
|
|
// TextOut(ps.hdc, rgxPos[3] + 2, iVert + 2, lpChannel->aszPatchName,
|
||
|
|
// lstrlen(lpChannel->aszPatchName));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
goto exit01;
|
||
|
|
} /* VSetupPaint */
|
||
|
|
|
||
|
|
static void PASCAL VSetupArrowScroll(
|
||
|
|
HWND hdlg,
|
||
|
|
WORD ScrollCode)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
WORD wChan;
|
||
|
|
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
wChan = lpSetup->channels[iVertPos + iCurPos].wChannel;
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
switch (ScrollCode) {
|
||
|
|
case SB_LINEDOWN:
|
||
|
|
if (!wChan--)
|
||
|
|
wChan = 15;
|
||
|
|
break;
|
||
|
|
case SB_LINEUP:
|
||
|
|
if (++wChan > 15)
|
||
|
|
wChan = 0;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
SetDlgItemInt(hWnd, ID_SETUPEDIT, wChan + 1, FALSE);
|
||
|
|
} /* VSetupArrowScroll */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* VSetupCheckMsg
|
||
|
|
*/
|
||
|
|
static void PASCAL VSetupCheckMsg(
|
||
|
|
WORD id,
|
||
|
|
WORD NotifCode)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
CHANNEL FAR* lpChannel;
|
||
|
|
|
||
|
|
if (NotifCode != BN_CLICKED)
|
||
|
|
return;
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
lpChannel = &lpSetup->channels[iVertPos + id - ID_SETUPCHECK];
|
||
|
|
if (lpChannel->wDeviceID != MMAP_ID_NOPORT) {
|
||
|
|
VSetupActiveChan( id - ID_SETUPCHECK
|
||
|
|
, &lpChannel->dFlags
|
||
|
|
, (lpChannel->dFlags & MMAP_ACTIVE)
|
||
|
|
? BTN3S_UNCHECK
|
||
|
|
: BTN3S_CHECK
|
||
|
|
);
|
||
|
|
Modify(TRUE);
|
||
|
|
}
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
} /* VSetupCheckMsg */
|
||
|
|
|
||
|
|
BOOL FAR PASCAL _loadds SetupBox(
|
||
|
|
HWND hdlg,
|
||
|
|
UINT uMessage,
|
||
|
|
WPARAM wParam,
|
||
|
|
LPARAM lParam)
|
||
|
|
{
|
||
|
|
int iRet;
|
||
|
|
HWND hwndCheckBox;
|
||
|
|
|
||
|
|
switch (uMessage) {
|
||
|
|
case WM_INITDIALOG:
|
||
|
|
hWnd = hdlg;
|
||
|
|
iOldPos = -1;
|
||
|
|
SetFocus(GetDlgItem(hdlg, ID_SETUPEDIT));
|
||
|
|
if (!FInitSetup(hdlg))
|
||
|
|
EndDialog(hdlg, FALSE);
|
||
|
|
SetFocus(hEdit);
|
||
|
|
PlaceWindow(hWnd);
|
||
|
|
return FALSE;
|
||
|
|
case WM_COMMAND:
|
||
|
|
{ WORD id = LOWORD(wParam);
|
||
|
|
#if defined(WIN16)
|
||
|
|
WORD NotifCode = HIWORD(lParam);
|
||
|
|
HWND hwnd = LOWORD(lParam);
|
||
|
|
#else
|
||
|
|
WORD NotifCode = HIWORD(wParam);
|
||
|
|
HWND hwnd = (HWND)lParam;
|
||
|
|
#endif //WIN16
|
||
|
|
|
||
|
|
switch (id) {
|
||
|
|
case IDH_DLG_MIDI_SETUPEDIT:
|
||
|
|
goto DoHelp;
|
||
|
|
|
||
|
|
case IDOK:
|
||
|
|
case IDCANCEL:
|
||
|
|
if (NotifCode != BN_CLICKED)
|
||
|
|
break;
|
||
|
|
if (!fReadOnly && ((id == IDOK) && fModified)) {
|
||
|
|
iRet = ISetupSave(hdlg, TRUE);
|
||
|
|
if (iRet == IDCANCEL)
|
||
|
|
break;
|
||
|
|
iRet = (iRet == IDYES);
|
||
|
|
} else
|
||
|
|
iRet = FALSE;
|
||
|
|
GlobalFree(hSetup);
|
||
|
|
EndDialog(hdlg, iRet);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case ID_SETUPGHOSTEDITFIRST:
|
||
|
|
|
||
|
|
/* assume the user back-tabbed before the first
|
||
|
|
* control on the current row, so jump to the
|
||
|
|
* previous row (if iCurPos > 0) or the last row
|
||
|
|
* (if iCurPos == 0)
|
||
|
|
*/
|
||
|
|
|
||
|
|
if (NotifCode != EN_SETFOCUS)
|
||
|
|
break;
|
||
|
|
if (iCurPos < 0)
|
||
|
|
/* do nothing */ ;
|
||
|
|
else
|
||
|
|
if (iCurPos > 0)
|
||
|
|
iCurPos--;
|
||
|
|
else
|
||
|
|
iCurPos = nLines - 1;
|
||
|
|
VSetupSetFocus(hdlg, PSF_REDRAW, 0);
|
||
|
|
hwndCheckBox = GetDlgItem(hdlg, ID_SETUPCHECK + iOldPos);
|
||
|
|
if (IsWindowEnabled(hwndCheckBox))
|
||
|
|
SetFocus(hwndCheckBox);
|
||
|
|
else
|
||
|
|
SetFocus(hPatchCombo);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case ID_SETUPGHOSTEDITLAST:
|
||
|
|
|
||
|
|
/* assume the user forward-tabbed beyond the last
|
||
|
|
* control on the current row, so jump to the
|
||
|
|
* next row (if iCurPos < nLines - 1) or the first row
|
||
|
|
* (if iCurPos == nLines - 1)
|
||
|
|
*/
|
||
|
|
|
||
|
|
if (NotifCode != EN_SETFOCUS)
|
||
|
|
break;
|
||
|
|
if (iCurPos < 0)
|
||
|
|
/* do nothing */ ;
|
||
|
|
else
|
||
|
|
if (iCurPos < nLines - 1)
|
||
|
|
iCurPos++;
|
||
|
|
else
|
||
|
|
iCurPos = 0;
|
||
|
|
VSetupSetFocus(hdlg, PSF_REDRAW, 0);
|
||
|
|
SetFocus(hEdit);
|
||
|
|
#if defined(WIN16)
|
||
|
|
SendMessage(hEdit, EM_SETSEL, (WPARAM)NULL, MAKELPARAM(0, 32767));
|
||
|
|
#else
|
||
|
|
SendMessage(hEdit, EM_SETSEL, (WPARAM)0, (LPARAM)-1);
|
||
|
|
#endif //WIN16
|
||
|
|
break;
|
||
|
|
|
||
|
|
case ID_SETUPEDIT:
|
||
|
|
VSetupEditMsg(hdlg, NotifCode);
|
||
|
|
break;
|
||
|
|
case ID_SETUPPORTCOMBO:
|
||
|
|
case ID_SETUPPATCHCOMBO:
|
||
|
|
VSetupComboMsg(hdlg, id, NotifCode);
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
if ((id >= ID_SETUPCHECK) &&
|
||
|
|
(id < ID_SETUPCHECK + 16))
|
||
|
|
VSetupCheckMsg(id, NotifCode);
|
||
|
|
else
|
||
|
|
return FALSE;
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
} /* end of WM_COMMAND */
|
||
|
|
case WM_PAINT:
|
||
|
|
VSetupPaint(hdlg);
|
||
|
|
break;
|
||
|
|
case WM_LBUTTONDOWN:
|
||
|
|
VSetupButtonDown(hdlg, (LONG)lParam);
|
||
|
|
break;
|
||
|
|
case WM_VSCROLL:
|
||
|
|
// if (HIWORD(lParam)) // in DOS this is the window ID - I don't see why we need the test
|
||
|
|
// and in NT we don't have that ID anyway
|
||
|
|
VSetupArrowScroll(hdlg, LOWORD(wParam));
|
||
|
|
// LOWORD(wParam) is scroll code. See cpArrow:
|
||
|
|
// actually the whole of wParam is.
|
||
|
|
break;
|
||
|
|
case WM_CHAR:
|
||
|
|
if ((LONG)lParam == 14)
|
||
|
|
if (iCurPos == 15)
|
||
|
|
iCurPos = 0;
|
||
|
|
else
|
||
|
|
iCurPos++;
|
||
|
|
else if ((LONG)lParam == 16)
|
||
|
|
if (!iCurPos)
|
||
|
|
iCurPos = 15;
|
||
|
|
else
|
||
|
|
iCurPos--;
|
||
|
|
else
|
||
|
|
return FALSE;
|
||
|
|
VSetupSetFocus(hdlg, 0L, 0L);
|
||
|
|
break;
|
||
|
|
case WM_CLOSE:
|
||
|
|
PostMessage(hdlg, WM_COMMAND, (WPARAM)IDOK, (LPARAM)0);
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
if (uMessage == uHelpMessage) {
|
||
|
|
DoHelp:
|
||
|
|
WinHelp(hWnd, szMidiHlp, HELP_CONTEXT,
|
||
|
|
IDH_DLG_MIDI_SETUPEDIT);
|
||
|
|
return TRUE;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
return FALSE;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return TRUE;
|
||
|
|
} /* SetupBox */
|
||
|
|
|
||
|
|
/*
|
||
|
|
* FSetupEnumPortsFunc
|
||
|
|
*
|
||
|
|
* This function receives port information for each channel in a setup,
|
||
|
|
* determines if the port is not available in the current environment, and
|
||
|
|
* if so adds it to a listbox of invalid port names.
|
||
|
|
*
|
||
|
|
* The types and parameters are weird because it is being forced into the straightjacket
|
||
|
|
* of an enumfunc.
|
||
|
|
*/
|
||
|
|
|
||
|
|
BOOL FAR PASCAL _loadds FSetupEnumPortsFunc(
|
||
|
|
LPSTR lpChannel,
|
||
|
|
LPSTR lpPort,
|
||
|
|
UINT uCase, // unused
|
||
|
|
HWND hCombo, //unused
|
||
|
|
LPSTR DeviceID)
|
||
|
|
{
|
||
|
|
SETUP FAR* lpSetup;
|
||
|
|
INT Idx;
|
||
|
|
|
||
|
|
if (DeviceID == (LPSTR)MMAP_ID_NOPORT) {
|
||
|
|
Idx = ComboLookup(hPortCombo, lpPort);
|
||
|
|
if (Idx == CB_ERR) {
|
||
|
|
SendMessage(hPortCombo, CB_ADDSTRING, (WPARAM)NULL,
|
||
|
|
(LPARAM)lpPort);
|
||
|
|
Idx = nPorts++;
|
||
|
|
}
|
||
|
|
lpSetup = (SETUP FAR*)GlobalLock(hSetup);
|
||
|
|
lpSetup->channels[(WORD)(DWORD_PTR)lpChannel - 1].wDeviceID = (WORD)Idx;
|
||
|
|
GlobalUnlock(hSetup);
|
||
|
|
}
|
||
|
|
return TRUE;
|
||
|
|
} /* FSetupEnumPortsFunc */
|
||
|
|
|