DIALOG.C

/******************************************************************************\ 
*       This is a part of the Microsoft Source Code Samples. 
*       Copyright 1993 - 1998 Microsoft Corporation. 
*       All rights reserved. 
*       This source code is only intended as a supplement to 
*       Microsoft Development Tools and/or WinHelp documentation. 
*       See these sources for detailed information regarding the 
*       Microsoft samples programs. 
\******************************************************************************/ 
 
#include <string.h> 
#include <stdio.h> 
#include "server.h" 
#include "huge.h" 
 
/**************************************************************************** 
 *                                                                          * 
 *  FUNCTION   : DoDialog()                                                 * 
 *                                                                          * 
 *  PURPOSE    : Generic dialog invocation routine.  Handles procInstance   * 
 *               stuff, focus management and param passing.                 * 
 *  RETURNS    : result of dialog procedure.                                * 
 *                                                                          * 
 ****************************************************************************/ 
INT FAR DoDialog( 
LPTSTR lpTemplateName, 
DLGPROC lpDlgProc, 
LPARAM param, 
BOOL fRememberFocus) 
{ 
    INT iRet; 
    HWND hwndFocus; 
    WORD cRunawayT; 
 
    cRunawayT = cRunaway; 
    cRunaway = 0;           // turn off runaway during dialogs. 
 
    if (fRememberFocus) 
        hwndFocus = GetFocus(); 
    lpDlgProc = MakeProcInstance(lpDlgProc, hInst); 
    iRet = DialogBoxParam(hInst, lpTemplateName, hwndServer, lpDlgProc, param); 
    FreeProcInstance(lpDlgProc); 
    if (fRememberFocus) 
        SetFocus(hwndFocus); 
 
    cRunaway = cRunawayT;   // restore runaway state. 
    return iRet; 
} 
 
 
/**************************************************************************** 
 
    FUNCTION: About(HWND, unsigned, WORD, LONG) 
 
    PURPOSE:  Processes messages for "About" dialog box 
 
    MESSAGES: 
 
        WM_INITDIALOG - initialize dialog box 
        WM_COMMAND    - Input received 
 
    COMMENTS: 
 
        No initialization is needed for this particular dialog box, but TRUE 
        must be returned to Windows. 
 
        Wait for user to click on "Ok" button, then close the dialog box. 
 
****************************************************************************/ 
 
BOOL  APIENTRY About(hDlg, message, wParam, lParam) 
HWND hDlg;                                /* window handle of the dialog box */ 
UINT message;                         /* type of message                 */ 
WPARAM wParam;                              /* message-specific information    */ 
LPARAM lParam; 
{ 
    switch (message) { 
        case WM_INITDIALOG:                /* message: initialize dialog box */ 
            return (TRUE); 
 
        case WM_COMMAND:                      /* message: received a command */ 
            if (LOWORD(wParam) == IDOK                /* "OK" box selected?          */ 
                || LOWORD(wParam) == IDCANCEL) {      /* System menu close command? */ 
                EndDialog(hDlg, TRUE);        /* Exits the dialog box        */ 
                return (TRUE); 
            } 
            break; 
    } 
    return (FALSE);                           /* Didn't process a message    */ 
} 
 
 
 
 
BOOL  APIENTRY RenderDelayDlgProc( 
HWND          hwnd, 
register UINT msg, 
register WPARAM wParam, 
LPARAM lParam) 
{ 
    switch (msg){ 
    case WM_INITDIALOG: 
        SetWindowText(hwnd, TEXT("Data Render Delay")); 
        SetDlgItemInt(hwnd, IDEF_VALUE, RenderDelay, FALSE); 
        SetDlgItemText(hwnd, IDTX_VALUE, TEXT("Delay in milliseconds:")); 
        return(1); 
        break; 
 
    case WM_COMMAND: 
        switch (LOWORD(wParam)) { 
        case IDOK: 
            RenderDelay = GetDlgItemInt(hwnd, IDEF_VALUE, NULL, FALSE); 
            // fall through 
        case IDCANCEL: 
            EndDialog(hwnd, 0); 
            break; 
 
        default: 
            return(FALSE); 
        } 
        break; 
    } 
    return(FALSE); 
} 
 
 
 
 
BOOL  APIENTRY SetTopicDlgProc( 
HWND          hwnd, 
register UINT msg, 
register WPARAM wParam, 
LPARAM lParam) 
{ 
    TCHAR szT[MAX_TOPIC + 20]; 
 
    switch (msg){ 
    case WM_INITDIALOG: 
        SetWindowText(hwnd, TEXT("Set Topic Dialog")); 
        SetDlgItemText(hwnd, IDEF_VALUE, szTopic); 
        SetDlgItemText(hwnd, IDTX_VALUE, TEXT("Topic:")); 
        return(1); 
        break; 
 
    case WM_COMMAND: 
        switch (LOWORD(wParam)) { 
        case IDOK: 
            DdeFreeStringHandle(idInst, topicList[1].hszTopic); 
            GetDlgItemText(hwnd, IDEF_VALUE, szTopic, MAX_TOPIC); 
            topicList[1].hszTopic = DdeCreateStringHandle(idInst, szTopic, 0); 
            _tcscpy(szT, szServer); 
            _tcscat(szT, TEXT(" | ")); 
            _tcscat(szT, szTopic); 
#ifdef UNICODE 
            _tcscat(szT, TEXT(" (Unicode)")); 
#endif 
            SetWindowText(hwndServer, szT); 
            // fall through 
        case IDCANCEL: 
            EndDialog(hwnd, 0); 
            break; 
 
        default: 
            return(FALSE); 
        } 
        break; 
    } 
    return(FALSE); 
} 
 
 
BOOL  APIENTRY SetServerDlgProc( 
HWND          hwnd, 
register UINT msg, 
register WPARAM wParam, 
LPARAM lParam) 
{ 
    TCHAR szT[MAX_TOPIC + 20]; 
 
    switch (msg){ 
    case WM_INITDIALOG: 
        SetWindowText(hwnd, TEXT("Set Server Name Dialog")); 
        SetDlgItemText(hwnd, IDEF_VALUE, szServer); 
        SetDlgItemText(hwnd, IDTX_VALUE, TEXT("Server:")); 
        return(1); 
        break; 
 
    case WM_COMMAND: 
        switch (LOWORD(wParam)) { 
        case IDOK: 
            GetDlgItemText(hwnd, IDEF_VALUE, szServer, MAX_TOPIC); 
            DdeNameService(idInst, hszAppName, 0, DNS_UNREGISTER); 
            DdeFreeStringHandle(idInst, hszAppName); 
            hszAppName = DdeCreateStringHandle(idInst, szServer, 0); 
            DdeNameService(idInst, hszAppName, 0, DNS_REGISTER); 
            _tcscpy(szT, szServer); 
            _tcscat(szT, TEXT(" | ")); 
            _tcscat(szT, szTopic); 
#ifdef UNICODE 
            _tcscat(szT, TEXT(" (Unicode)")); 
#endif 
            SetWindowText(hwndServer, szT); 
            // fall through 
        case IDCANCEL: 
            EndDialog(hwnd, 0); 
            break; 
 
        default: 
            return(FALSE); 
        } 
        break; 
    } 
    return(FALSE); 
} 
 
 
 
 
BOOL  APIENTRY ContextDlgProc( 
HWND hwnd, 
register UINT msg, 
register WPARAM wParam, 
LPARAM lParam) 
{ 
    BOOL fSuccess; 
 
    switch (msg){ 
    case WM_INITDIALOG: 
        SetDlgItemInt(hwnd, IDEF_FLAGS, CCFilter.wFlags, FALSE); 
        SetDlgItemInt(hwnd, IDEF_COUNTRY, CCFilter.wCountryID, FALSE); 
        SetDlgItemInt(hwnd, IDEF_CODEPAGE, CCFilter.iCodePage, TRUE); 
        SetDlgItemInt(hwnd, IDEF_LANG, LOWORD(CCFilter.dwLangID), FALSE); 
        SetDlgItemInt(hwnd, IDEF_SECURITY, LOWORD(CCFilter.dwSecurity), FALSE); 
        CheckRadioButton(hwnd, IDRB_IL_ANON, IDRB_IL_DELEGATE, 
                IDRB_IL_ANON + (int)CCFilter.qos.ImpersonationLevel); 
        return(1); 
        break; 
 
    case WM_COMMAND: 
        switch (LOWORD(wParam)) { 
        case IDOK: 
            CCFilter.wFlags = GetDlgItemInt(hwnd, IDEF_FLAGS, &fSuccess, FALSE); 
            if (!fSuccess) return(0); 
            CCFilter.wCountryID = GetDlgItemInt(hwnd, IDEF_COUNTRY, &fSuccess, FALSE); 
            if (!fSuccess) return(0); 
            CCFilter.iCodePage = GetDlgItemInt(hwnd, IDEF_CODEPAGE, &fSuccess, TRUE); 
            if (!fSuccess) return(0); 
            CCFilter.dwLangID = (DWORD)GetDlgItemInt(hwnd, IDEF_LANG, &fSuccess, FALSE); 
            if (!fSuccess) return(0); 
            CCFilter.dwSecurity = (DWORD)GetDlgItemInt(hwnd, IDEF_SECURITY, &fSuccess, FALSE); 
            if (!fSuccess) return(0); 
 
            if (IsDlgButtonChecked(hwnd, IDRB_IL_ANON)) { 
                CCFilter.qos.ImpersonationLevel = SecurityAnonymous; 
            } else if (IsDlgButtonChecked(hwnd, IDRB_IL_ID)) { 
                CCFilter.qos.ImpersonationLevel = SecurityIdentification; 
            } else if (IsDlgButtonChecked(hwnd, IDRB_IL_IMP)) { 
                CCFilter.qos.ImpersonationLevel = SecurityImpersonation; 
            } else if (IsDlgButtonChecked(hwnd, IDRB_IL_DELEGATE)) { 
                CCFilter.qos.ImpersonationLevel = SecurityDelegation; 
            } 
 
            // fall through 
        case IDCANCEL: 
            EndDialog(hwnd, 0); 
            break; 
 
        default: 
            return(FALSE); 
        } 
        break; 
    } 
    return(FALSE); 
}