|
|
#include "precomp.h"
#pragma hdrstop
/***************************************************************************/ /****************** Basic Class Dialog Handlers ****************************/ /***************************************************************************/
#define cchpMax 511
/*
** Purpose: ** Multi Edit Dialog procedure for templates with multiple edit controls. ** Control IDs: ** The Edit controls must have IDs of IDC_EDIT1 to IDC_EDIT10. ** Pushbuttons recognized are IDC_O, IDC_C, IDC_M, IDC_H, IDC_X, and IDC_B. ** Initialization: ** The symbol $(EditTextIn) is used to set the initial text in the Edit ** controls. The symbol $(EditTextLim) is used to set the limit of the ** text in the edit fields. ** Termination: ** The strings in the Edit controls are stored in the symbol $(EditTextOut) ** The id of the Pushbutton (eg IDC_C) which caused termination is ** converted to a string and stored in the symbol $(ButtonPressed). ** *****************************************************************************/ INT_PTR APIENTRY FGstMultiEditDlgProc( HWND hdlg, UINT wMsg, WPARAM wParam, LPARAM lParam )
{ CHP rgchNum[10]; CHP rgchText[cchpMax + 1]; RGSZ rgsz, rgszEditTextIn, rgszEditTextLim; PSZ pszEditTextIn, pszEditTextLim; SZ sz, szEditTextIn, szEditTextLim; INT i, nCount, idc; INT DefEditCtl; BOOL NeedToSetFocus = FALSE;
Unused(lParam);
switch (wMsg) {
case STF_REINITDIALOG:
if ((sz = SzFindSymbolValueInSymTab("ReInit")) == (SZ)NULL || (CrcStringCompareI(sz, "YES") != crcEqual)) { return(fTrue); }
//
// See whether we are supposed to set the focus to a certain
// edit control.
//
if((sz = SzFindSymbolValueInSymTab("DefEditCtl")) != NULL) { NeedToSetFocus = TRUE; DefEditCtl = atoi(sz); }
case WM_INITDIALOG:
AssertDataSeg();
FRemoveSymbolFromSymTab("DefEditCtl");
if( wMsg == WM_INITDIALOG ) { FCenterDialogOnDesktop(hdlg); }
//
// find the initalisers: EditTextIn, EditTextLim
//
szEditTextIn = SzFindSymbolValueInSymTab("EditTextIn"); szEditTextLim = SzFindSymbolValueInSymTab("EditTextLim");
if ( szEditTextIn == (SZ)NULL || szEditTextLim == (SZ)NULL ) {
Assert(fFalse); return(fTrue);
}
//
// Convert initializers to rgsz structures
//
while ((pszEditTextIn = rgszEditTextIn = RgszFromSzListValue(szEditTextIn)) == (RGSZ)NULL) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
while ((pszEditTextLim = rgszEditTextLim = RgszFromSzListValue(szEditTextLim)) == (RGSZ)NULL) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
//
// Circulate through the initialisers: EditTextIn, EditTextLim
// in tandem, initialising the edit boxes that
// are there in this dialog
//
idc = IDC_EDIT1;
while ( (szEditTextIn = *pszEditTextIn++) != (SZ)NULL && (szEditTextLim = *pszEditTextLim++) != (SZ)NULL ) {
// First set the limit of the text in the edit field
SendDlgItemMessage( hdlg, idc, EM_LIMITTEXT, atoi(szEditTextLim), 0L );
// And then set the text in the edit field
SetDlgItemText(hdlg, idc++, (LPSTR)szEditTextIn);
}
EvalAssert(FFreeRgsz(rgszEditTextIn)); EvalAssert(FFreeRgsz(rgszEditTextLim));
if(NeedToSetFocus) { SetFocus(GetDlgItem(hdlg,IDC_EDIT1+DefEditCtl)); return(FALSE); }
return(fTrue);
case WM_CLOSE: PostMessage( hdlg, WM_COMMAND, MAKELONG(IDC_X, BN_CLICKED), 0L ); return(fTrue);
case WM_COMMAND: switch(LOWORD(wParam)) {
case IDCANCEL: if (LOWORD(wParam) == IDCANCEL) {
if (!GetDlgItem(hdlg, IDC_B) || HIWORD(GetKeyState(VK_CONTROL)) || HIWORD(GetKeyState(VK_SHIFT)) || HIWORD(GetKeyState(VK_MENU))) { break; } wParam = IDC_B;
} case IDC_C: case IDC_B: case IDC_O: case IDC_M: case IDC_X: case IDC_BTN0: case IDC_BTN1: case IDC_BTN2: case IDC_BTN3: case IDC_BTN4: case IDC_BTN5: case IDC_BTN6: case IDC_BTN7: case IDC_BTN8: case IDC_BTN9:
// Add the button pressed to the symbol table
_itoa((INT)wParam, rgchNum, 10); while (!FAddSymbolValueToSymTab("ButtonPressed", rgchNum)) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
// Add EditTextOut list variable to the symbol table
for (i = 0; i < 10; i++) { if (GetDlgItem(hdlg, IDC_EDIT1 + i) == (HWND)NULL) { break; } }
// i has the number of edit fields, allocate an rgsz structure
// with i+1 entries (last one NULL TERMINATOR)
nCount = i; while ((rgsz = (RGSZ)SAlloc((CB)((nCount + 1) * sizeof(SZ)))) == (RGSZ)NULL) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
rgsz[nCount] = (SZ)NULL;
// Circulate through the edit fields in the dialog box, determining
// the text in each and storing it in the
for (i = 0; i < nCount; i++) {
SendDlgItemMessage( hdlg, IDC_EDIT1 + i, (WORD)WM_GETTEXT, cchpMax + 1, (LPARAM)rgchText );
rgsz[i] = SzDupl(rgchText); }
// Form a list out of the rgsz structure
while ((sz = SzListValueFromRgsz(rgsz)) == (SZ)NULL) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
// Set the EditTextOut symbol to this list
while (!FAddSymbolValueToSymTab("EditTextOut", sz)) { if (!FHandleOOM(hdlg)) { DestroyWindow(GetParent(hdlg)); return(fTrue); } }
EvalAssert(FFreeRgsz(rgsz)); SFree(sz);
PostMessage(GetParent(hdlg), (WORD)STF_UI_EVENT, 0, 0L); break; } break;
case STF_DESTROY_DLG: PostMessage(GetParent(hdlg), (WORD)STF_EDIT_DLG_DESTROYED, 0, 0L); DestroyWindow(hdlg); return(fTrue); }
return(fFalse); }
|