]>
git.saurik.com Git - wxWidgets.git/blob - src/gtk1/control.cpp
dfbfe4b9c0eba7cf531840269c3c511f5c72f6eb
1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling, Julian Smart and Vadim Zeitlin
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
10 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
11 #pragma implementation "control.h"
14 // For compilers that support precompilation, includes "wx.h".
15 #include "wx/wxprec.h"
21 #include "wx/control.h"
22 #include "wx/fontutil.h"
23 #include "wx/settings.h"
27 //-----------------------------------------------------------------------------
29 //-----------------------------------------------------------------------------
31 IMPLEMENT_DYNAMIC_CLASS(wxControl
, wxWindow
)
33 wxControl::wxControl()
38 bool wxControl::Create( wxWindow
*parent
,
43 const wxValidator
& validator
,
44 const wxString
&name
)
46 bool ret
= wxWindow::Create(parent
, id
, pos
, size
, style
, name
);
49 SetValidator(validator
);
55 void wxControl::SetLabel( const wxString
&label
)
58 for ( const wxChar
*pc
= label
; *pc
!= wxT('\0'); pc
++ )
60 if ( *pc
== wxT('&') )
63 #if 0 // it would be unused anyhow for now - kbd interface not done yet
64 if ( *pc
!= wxT('&') ) m_chAccel
= *pc
;
71 wxString
wxControl::GetLabel() const
77 wxSize
wxControl::DoGetBestSize() const
79 // Do not return any arbitrary default value...
80 wxASSERT_MSG( m_widget
, wxT("DoGetBestSize called before creation") );
85 (* GTK_WIDGET_CLASS( GTK_OBJECT_GET_CLASS(m_widget
) )->size_request
)
88 return wxSize(req
.width
, req
.height
);
92 void wxControl::PostCreation(const wxSize
& size
)
94 wxWindow::PostCreation();
97 SetInitialBestSize(size
);
102 wxString
wxControl::PrepareLabelMnemonics( const wxString
&label
) const
104 //Format mnemonics properly for GTK2. This can be called from GTK1.x, but
105 //it's not very useful because mnemonics don't exist prior to GTK2.
107 for (size_t i
= 0; i
< label
.Len(); i
++)
109 if (label
.GetChar(i
) == wxT('&'))
111 //Mnemonic escape sequence "&&" is a literal "&" in the output.
112 if (label
.GetChar(i
+ 1) == wxT('&'))
117 //Handle special case of "&_" (i.e. "_" is the mnemonic).
118 //FIXME - Is it possible to use "_" as a GTK mnemonic? Just use a
120 else if (label
.GetChar(i
+ 1) == wxT('_'))
125 //Replace WX mnemonic indicator "&" with GTK indicator "_".
131 else if (label
.GetChar(i
) == wxT('_'))
133 //Escape any underlines in the string so GTK doesn't use them.
138 label2
<< label
.GetChar(i
);
146 wxVisualAttributes
wxControl::GetDefaultAttributes() const
148 return GetDefaultAttributesFromGTKWidget(m_widget
,
153 #define SHIFT (8*(sizeof(short int)-sizeof(char)))
157 wxControl::GetDefaultAttributesFromGTKWidget(GtkWidget
* widget
,
162 wxVisualAttributes attr
;
164 style
= gtk_rc_get_style(widget
);
166 style
= gtk_widget_get_default_style();
170 return wxWindow::GetClassDefaultAttributes(wxWINDOW_VARIANT_NORMAL
);
174 state
= GTK_STATE_NORMAL
;
176 // get the style's colours
177 attr
.colFg
= wxColour(style
->fg
[state
].red
>> SHIFT
,
178 style
->fg
[state
].green
>> SHIFT
,
179 style
->fg
[state
].blue
>> SHIFT
);
181 attr
.colBg
= wxColour(style
->base
[state
].red
>> SHIFT
,
182 style
->base
[state
].green
>> SHIFT
,
183 style
->base
[state
].blue
>> SHIFT
);
185 attr
.colBg
= wxColour(style
->bg
[state
].red
>> SHIFT
,
186 style
->bg
[state
].green
>> SHIFT
,
187 style
->bg
[state
].blue
>> SHIFT
);
189 // get the style's font
191 if ( !style
->font_desc
)
192 style
= gtk_widget_get_default_style();
193 if ( style
&& style
->font_desc
)
195 wxNativeFontInfo info
;
196 info
.description
= style
->font_desc
;
197 attr
.font
= wxFont(info
);
201 GtkSettings
*settings
= gtk_settings_get_default();
202 gchar
*font_name
= NULL
;
203 g_object_get ( settings
,
208 attr
.font
= wxSystemSettings::GetFont( wxSYS_DEFAULT_GUI_FONT
);
210 attr
.font
= wxFont(wxString::FromAscii(font_name
));
214 // TODO: isn't there a way to get a standard gtk 1.2 font?
215 attr
.font
= wxFont( 12, wxSWISS
, wxNORMAL
, wxNORMAL
);
224 wxControl::GetDefaultAttributesFromGTKWidget(GtkWidget
* (*widget_new
)(void),
228 wxVisualAttributes attr
;
229 GtkWidget
* widget
= widget_new();
230 attr
= GetDefaultAttributesFromGTKWidget(widget
, useBase
, state
);
231 gtk_widget_destroy(widget
);
237 wxControl::GetDefaultAttributesFromGTKWidget(GtkWidget
* (*widget_new
)(const gchar
*),
241 wxVisualAttributes attr
;
242 GtkWidget
* widget
= widget_new("");
243 attr
= GetDefaultAttributesFromGTKWidget(widget
, useBase
, state
);
244 gtk_widget_destroy(widget
);
251 wxControl::GetDefaultAttributesFromGTKWidget(GtkWidget
* (*widget_new
)(GtkAdjustment
*),
255 wxVisualAttributes attr
;
256 GtkWidget
* widget
= widget_new(NULL
);
257 attr
= GetDefaultAttributesFromGTKWidget(widget
, useBase
, state
);
258 gtk_widget_destroy(widget
);
263 #endif // wxUSE_CONTROLS