| 1 | ///////////////////////////////////////////////////////////////////////////// |
| 2 | // Name: src/motif/button.cpp |
| 3 | // Purpose: wxButton |
| 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 | // For compilers that support precompilation, includes "wx.h". |
| 13 | #include "wx/wxprec.h" |
| 14 | |
| 15 | #include "wx/button.h" |
| 16 | |
| 17 | #ifdef __VMS__ |
| 18 | #pragma message disable nosimpint |
| 19 | #endif |
| 20 | #include <Xm/PushBG.h> |
| 21 | #include <Xm/PushB.h> |
| 22 | #ifdef __VMS__ |
| 23 | #pragma message enable nosimpint |
| 24 | #endif |
| 25 | |
| 26 | |
| 27 | #ifndef WX_PRECOMP |
| 28 | #include "wx/toplevel.h" |
| 29 | #endif |
| 30 | |
| 31 | #include "wx/stockitem.h" |
| 32 | #include "wx/motif/private.h" |
| 33 | #include "wx/sysopt.h" |
| 34 | |
| 35 | void wxButtonCallback (Widget w, XtPointer clientData, XtPointer ptr); |
| 36 | |
| 37 | IMPLEMENT_DYNAMIC_CLASS(wxButton, wxControl) |
| 38 | |
| 39 | #define MIN_WIDTH 78 |
| 40 | #define MIN_LARGE_HEIGHT 30 |
| 41 | |
| 42 | // Button |
| 43 | |
| 44 | bool wxButton::Create(wxWindow *parent, wxWindowID id, const wxString& lbl, |
| 45 | const wxPoint& pos, |
| 46 | const wxSize& size, long style, |
| 47 | const wxValidator& validator, |
| 48 | const wxString& name) |
| 49 | { |
| 50 | wxString label(lbl); |
| 51 | if (label.empty() && wxIsStockID(id)) |
| 52 | label = wxGetStockLabel(id); |
| 53 | |
| 54 | if( !CreateControl( parent, id, pos, size, style, validator, name ) ) |
| 55 | return false; |
| 56 | PreCreation(); |
| 57 | |
| 58 | wxXmString text( GetLabelText(label) ); |
| 59 | |
| 60 | Widget parentWidget = (Widget) parent->GetClientWidget(); |
| 61 | |
| 62 | /* |
| 63 | * Patch Note (important) |
| 64 | * There is no major reason to put a defaultButtonThickness here. |
| 65 | * Not requesting it give the ability to put wxButton with a spacing |
| 66 | * as small as requested. However, if some button become a DefaultButton, |
| 67 | * other buttons are no more aligned -- This is why we set |
| 68 | * defaultButtonThickness of ALL buttons belonging to the same wxPanel, |
| 69 | * in the ::SetDefaultButton method. |
| 70 | */ |
| 71 | m_mainWidget = (WXWidget) XtVaCreateManagedWidget ("button", |
| 72 | xmPushButtonWidgetClass, |
| 73 | parentWidget, |
| 74 | wxFont::GetFontTag(), m_font.GetFontTypeC(XtDisplay(parentWidget)), |
| 75 | XmNlabelString, text(), |
| 76 | XmNrecomputeSize, False, |
| 77 | // See comment for wxButton::SetDefault |
| 78 | // XmNdefaultButtonShadowThickness, 1, |
| 79 | NULL); |
| 80 | |
| 81 | XtAddCallback ((Widget) m_mainWidget, |
| 82 | XmNactivateCallback, (XtCallbackProc) wxButtonCallback, |
| 83 | (XtPointer) this); |
| 84 | |
| 85 | wxSize best = GetBestSize(); |
| 86 | if( size.x != -1 ) best.x = size.x; |
| 87 | if( size.y != -1 ) best.y = size.y; |
| 88 | |
| 89 | PostCreation(); |
| 90 | AttachWidget (parent, m_mainWidget, (WXWidget) NULL, |
| 91 | pos.x, pos.y, best.x, best.y); |
| 92 | |
| 93 | return true; |
| 94 | } |
| 95 | |
| 96 | void wxButton::SetDefaultShadowThicknessAndResize() |
| 97 | { |
| 98 | Widget buttonWidget = (Widget)GetMainWidget(); |
| 99 | bool managed = XtIsManaged( buttonWidget ); |
| 100 | if( managed ) |
| 101 | XtUnmanageChild( buttonWidget ); |
| 102 | |
| 103 | XtVaSetValues( buttonWidget, |
| 104 | XmNdefaultButtonShadowThickness, 1, |
| 105 | NULL ); |
| 106 | |
| 107 | if( managed ) |
| 108 | XtManageChild( buttonWidget ); |
| 109 | |
| 110 | // this can't currently be done, because user code that calls SetDefault |
| 111 | // will break otherwise |
| 112 | #if 0 |
| 113 | wxSize best = GetBestSize(), actual = GetSize(); |
| 114 | if( best.x < actual.x ) best.x = actual.x; |
| 115 | if( best.y < actual.y ) best.y = actual.y; |
| 116 | |
| 117 | if( best != actual ) |
| 118 | SetSize( best ); |
| 119 | #endif |
| 120 | InvalidateBestSize(); |
| 121 | } |
| 122 | |
| 123 | |
| 124 | wxWindow *wxButton::SetDefault() |
| 125 | { |
| 126 | wxWindow *oldDefault = wxButtonBase::SetDefault(); |
| 127 | |
| 128 | // We initially do not set XmNdefaultShadowThickness, to have |
| 129 | // small buttons. Unfortunately, buttons are now mis-aligned. We |
| 130 | // try to correct this now -- setting this ressource to 1 for each |
| 131 | // button in the same row. Because it's very hard to find |
| 132 | // wxButton in the same row, correction is straighforward: we set |
| 133 | // resource for all wxButton in this parent (but not sub panels) |
| 134 | |
| 135 | wxWindow *parent = GetParent(); |
| 136 | for (wxWindowList::compatibility_iterator node = parent->GetChildren().GetFirst (); |
| 137 | node; node = node->GetNext ()) |
| 138 | { |
| 139 | wxWindow *win = node->GetData (); |
| 140 | wxButton *item = wxDynamicCast(win, wxButton); |
| 141 | if (item) |
| 142 | item->SetDefaultShadowThicknessAndResize(); |
| 143 | } |
| 144 | |
| 145 | XtVaSetValues ((Widget) parent->GetMainWidget(), |
| 146 | XmNdefaultButton, (Widget) GetMainWidget(), |
| 147 | NULL); |
| 148 | |
| 149 | return oldDefault; |
| 150 | } |
| 151 | |
| 152 | static inline bool wxMotifLargeButtons() |
| 153 | { |
| 154 | return wxSystemOptions::HasOption("motif.largebuttons") |
| 155 | && wxSystemOptions::GetOptionInt("motif.largebuttons") != 0; |
| 156 | } |
| 157 | |
| 158 | /* static */ |
| 159 | wxSize wxButton::GetDefaultSize() |
| 160 | { |
| 161 | // TODO: check font size as in wxMSW ? MB |
| 162 | // Note: this is the button size (text + margin + shadow + defaultBorder) |
| 163 | return wxSize( MIN_WIDTH, MIN_LARGE_HEIGHT ); |
| 164 | } |
| 165 | |
| 166 | wxSize wxButton::DoGetBestSize() const |
| 167 | { |
| 168 | if( wxMotifLargeButtons() ) |
| 169 | return OldGetBestSize(); |
| 170 | |
| 171 | wxSize best = wxControl::DoGetBestSize(); |
| 172 | |
| 173 | if( HasFlag( wxBU_EXACTFIT ) ) |
| 174 | return best; |
| 175 | else if( best.x < MIN_WIDTH ) |
| 176 | best.x = MIN_WIDTH; |
| 177 | |
| 178 | return best; |
| 179 | } |
| 180 | |
| 181 | wxSize wxButton::GetMinSize() const |
| 182 | { |
| 183 | if( wxMotifLargeButtons() ) |
| 184 | return OldGetMinSize(); |
| 185 | |
| 186 | return DoGetBestSize(); |
| 187 | } |
| 188 | |
| 189 | wxSize wxButton::OldGetMinSize() const |
| 190 | { |
| 191 | return OldGetBestSize(); |
| 192 | } |
| 193 | |
| 194 | wxSize wxButton::OldGetBestSize() const |
| 195 | { |
| 196 | Dimension xmargin, ymargin, highlight, shadow, defThickness; |
| 197 | |
| 198 | XtVaGetValues( (Widget)m_mainWidget, |
| 199 | XmNmarginWidth, &xmargin, |
| 200 | XmNmarginHeight, &ymargin, |
| 201 | XmNhighlightThickness, &highlight, |
| 202 | XmNshadowThickness, &shadow, |
| 203 | XmNdefaultButtonShadowThickness, &defThickness, |
| 204 | NULL ); |
| 205 | |
| 206 | int x = 0; int y = 0; |
| 207 | GetTextExtent( GetLabel(), &x, &y ); |
| 208 | |
| 209 | int margin = highlight * 2 + |
| 210 | ( defThickness ? ( ( shadow + defThickness ) * 4 ) : ( shadow * 2 ) ); |
| 211 | |
| 212 | wxSize best( x + xmargin * 2 + margin, |
| 213 | y + ymargin * 2 + margin ); |
| 214 | |
| 215 | // all buttons have at least the standard size unless the user explicitly |
| 216 | // wants them to be of smaller size and used wxBU_EXACTFIT style when |
| 217 | // creating the button |
| 218 | if( !HasFlag( wxBU_EXACTFIT ) ) |
| 219 | { |
| 220 | wxSize def = GetDefaultSize(); |
| 221 | int margin = highlight * 2 + |
| 222 | ( defThickness ? ( shadow * 4 + defThickness * 4 ) : 0 ); |
| 223 | def.x += margin; |
| 224 | def.y += margin; |
| 225 | |
| 226 | if( def.x > best.x ) |
| 227 | best.x = def.x; |
| 228 | if( def.y > best.y ) |
| 229 | best.y = def.y; |
| 230 | } |
| 231 | |
| 232 | return best; |
| 233 | } |
| 234 | |
| 235 | void wxButton::Command (wxCommandEvent & event) |
| 236 | { |
| 237 | ProcessCommand (event); |
| 238 | } |
| 239 | |
| 240 | void wxButtonCallback (Widget w, XtPointer clientData, XtPointer WXUNUSED(ptr)) |
| 241 | { |
| 242 | if (!wxGetWindowFromTable(w)) |
| 243 | // Widget has been deleted! |
| 244 | return; |
| 245 | |
| 246 | wxButton *item = (wxButton *) clientData; |
| 247 | wxCommandEvent event (wxEVT_COMMAND_BUTTON_CLICKED, item->GetId()); |
| 248 | event.SetEventObject(item); |
| 249 | item->ProcessCommand (event); |
| 250 | } |