]> git.saurik.com Git - wxWidgets.git/blob - src/motif/control.cpp
A fix for attribrute sorting, but it's still broken if there are
[wxWidgets.git] / src / motif / control.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: control.cpp
3 // Purpose: wxControl class
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 17/09/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "control.h"
14 #endif
15
16 #include "wx/defs.h"
17
18 #include "wx/control.h"
19 #include "wx/panel.h"
20 #include "wx/utils.h"
21
22 #ifdef __VMS__
23 #pragma message disable nosimpint
24 #endif
25 #include <Xm/Xm.h>
26 #ifdef __VMS__
27 #pragma message enable nosimpint
28 #endif
29
30 IMPLEMENT_ABSTRACT_CLASS(wxControl, wxWindow)
31
32 BEGIN_EVENT_TABLE(wxControl, wxWindow)
33 END_EVENT_TABLE()
34
35 // Item members
36 wxControl::wxControl()
37 {
38 m_backgroundColour = *wxWHITE;
39 m_foregroundColour = *wxBLACK;
40
41 #if WXWIN_COMPATIBILITY
42 m_callback = 0;
43 #endif // WXWIN_COMPATIBILITY
44
45 m_inSetValue = FALSE;
46 }
47
48 bool wxControl::Create( wxWindow *parent,
49 wxWindowID id,
50 const wxPoint &pos,
51 const wxSize &size,
52 long style,
53 const wxValidator& validator,
54 const wxString &name)
55 {
56 bool ret = wxWindow::Create(parent, id, pos, size, style, name);
57
58 #if wxUSE_VALIDATORS
59 SetValidator(validator);
60 #endif
61
62 return ret;
63 }
64
65 wxControl::~wxControl()
66 {
67 // If we delete an item, we should initialize the parent panel,
68 // because it could now be invalid.
69 if ( GetParent()->panel->GetDefaultItem() == this)
70 panel->SetDefaultItem(NULL);
71 }
72
73 void wxControl::SetLabel(const wxString& label)
74 {
75 Widget widget = (Widget) GetLabelWidget() ;
76 if (!widget)
77 return;
78
79 wxStripMenuCodes((char*) (const char*) label, wxBuffer);
80
81 XmString text = XmStringCreateSimple (wxBuffer);
82 XtVaSetValues (widget,
83 XmNlabelString, text,
84 XmNlabelType, XmSTRING,
85 NULL);
86 XmStringFree (text);
87 }
88
89 wxString wxControl::GetLabel() const
90 {
91 Widget widget = (Widget) GetLabelWidget() ;
92 if (!widget)
93 return wxEmptyString;
94
95 XmString text;
96 char *s;
97 XtVaGetValues (widget,
98 XmNlabelString, &text,
99 NULL);
100
101 if (XmStringGetLtoR (text, XmSTRING_DEFAULT_CHARSET, &s))
102 {
103 wxString str(s);
104 XtFree (s);
105 XmStringFree(text);
106 return str;
107 }
108 else
109 {
110 // XmStringFree(text);
111 return wxEmptyString;
112 }
113 }
114
115 bool wxControl::ProcessCommand(wxCommandEvent & event)
116 {
117 #if WXWIN_COMPATIBILITY
118 if ( m_callback )
119 {
120 (void)(*m_callback)(this, event);
121
122 return TRUE;
123 }
124 else
125 #endif // WXWIN_COMPATIBILITY
126
127 return GetEventHandler()->ProcessEvent(event);
128 }