← Back to branch summary

~ubuntu-branches/ubuntu/utopic/tcm/utopic

« back to all changes in this revision

Viewing changes to src/ui/questiondialog.c

  • Committer: Bazaar Package Importer
  • Author(s): Otavio Salvador
  • Date: 2003-07-03 20:08:21 UTC
  • Revision ID: james.westby@ubuntu.com-20030703200821-se4xtqx25e5miczi
Tags: upstream-2.20
Import upstream version 2.20

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/ui/questiondialog.c
 
1
////////////////////////////////////////////////////////////////////////////////
 
2
//
 
3
// This file is part of Toolkit for Conceptual Modeling (TCM).
 
4
// (c) copyright 1997, Vrije Universiteit Amsterdam.
 
5
// Author: Frank Dehne (frank@cs.vu.nl).
 
6
//
 
7
// TCM is free software; you can redistribute it and/or modify
 
8
// it under the terms of the GNU General Public License as published by
 
9
// the Free Software Foundation; either version 2 of the License, or
 
10
// (at your option) any later version.
 
11
//
 
12
// TCM is distributed in the hope that it will be useful,
 
13
// but WITHOUT ANY WARRANTY; without even the implied warranty of
 
14
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
15
// GNU General Public License for more details.
 
16
//
 
17
// You should have received a copy of the GNU General Public License
 
18
// along with TCM; if not, write to the Free Software
 
19
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 
20
// 02111-1307, USA.
 
21
////////////////////////////////////////////////////////////////////////////////
 
22
#include "questiondialog.h"
 
23
#include "application.h"
 
24
#include "error.h"
 
25
#include "mstring.h"
 
26
#include <Xm/XmAll.h>
 
27
 
 
28
QuestionDialog::QuestionDialog(Widget w, bool cancel): 
 
29
                MessageDialog(w, MessageDialog::QUESTION) {
 
30
        withCancel = cancel;
 
31
        answer = UNKNOWN;
 
32
}
 
33
 
 
34
void QuestionDialog::CreateWidget() {
 
35
        Arg args[9]; int i = 0;
 
36
        XtSetArg(args[i], XmNautoUnmanage, GetAutoUnmanage()); i++;
 
37
        SetWidget(XmCreateQuestionDialog(GetParent(), (char *)GetClassName(), args, i));
 
38
}
 
39
 
 
40
void QuestionDialog::Configure() {
 
41
        SetModal(True);
 
42
        if (!withCancel)
 
43
                ManageHelpButton(False);
 
44
        SetOKButtonLabel("Yes");
 
45
        SetCancelButtonLabel("No");
 
46
        SetHelpButtonLabel("Cancel");
 
47
        // define callback for the yes, no and cancel button
 
48
        SetOKCallback(ResponseCB, this);
 
49
        SetCancelCallback(ResponseCB, this);
 
50
        if (withCancel)
 
51
                SetHelpCallback(ResponseCB, this);
 
52
        else
 
53
                ManageHelpButton(False);
 
54
}
 
55
 
 
56
void QuestionDialog::Popup() {
 
57
        error("%s, line %d: Use GetAnswer() in question dialog\n",
 
58
                __FILE__, __LINE__);
 
59
}
 
60
 
 
61
void QuestionDialog::Show(const char *, const char *) {
 
62
        error("%s, line %d: Use GetAnswer() in question dialog\n",
 
63
                __FILE__, __LINE__);
 
64
}
 
65
 
 
66
void QuestionDialog::Show(const char *s, const string *m) {
 
67
        Show(s, m->getstr());
 
68
}
 
69
 
 
70
QuestionDialog::AnswerType QuestionDialog::GetAnswer() {
 
71
        MessageDialog::Popup();
 
72
        answer = UNKNOWN;
 
73
        // while the user has not provided an answer, simulate main
 
74
        // loop. The answer changes as soon as the user selects one of
 
75
        // the buttons and the callback routine changes its value.
 
76
        // Don't break loop until XtPending() also returns False to
 
77
        // assure widget destruction.
 
78
        XtAppContext applicationContext = theApplication->GetAppContext();
 
79
        while (answer == UNKNOWN)
 
80
                XtAppProcessEvent(applicationContext, XtIMAll);
 
81
        return answer;
 
82
}
 
83
 
 
84
void QuestionDialog::ResponseCB(Widget, XtPointer cd, XtPointer cbs) {
 
85
        XmAnyCallbackStruct *s = (XmAnyCallbackStruct *)cbs;
 
86
        QuestionDialog *q = (QuestionDialog *)cd;
 
87
        AnswerType a = NO;
 
88
        switch (s->reason) {
 
89
        case XmCR_CANCEL:
 
90
                a = NO;
 
91
                break;
 
92
        case XmCR_OK:
 
93
                a = YES;
 
94
                break;
 
95
        case XmCR_HELP:
 
96
                a = CANCEL;
 
97
                break;
 
98
        default:
 
99
                break;
 
100
        }
 
101
        q->SetAnswer(a);
 
102
}