#include "wx/radiobut.h"
+//-----------------------------------------------------------------------------
+// data
+//-----------------------------------------------------------------------------
+
+extern bool g_blockEventsOnDrag;
+
+//-----------------------------------------------------------------------------
+// wxRadioButton
+//-----------------------------------------------------------------------------
+
+IMPLEMENT_DYNAMIC_CLASS(wxRadioButton,wxControl)
+
+static void gtk_radiobutton_clicked_callback( GtkWidget *WXUNUSED(widget), wxRadioButton *rb )
+{
+ if (!rb->HasVMT()) return;
+ if (g_blockEventsOnDrag) return;
+
+ wxCommandEvent event( wxEVT_COMMAND_RADIOBUTTON_SELECTED, rb->GetId());
+ event.SetInt( rb->GetValue() );
+ event.SetEventObject( rb );
+ rb->GetEventHandler()->ProcessEvent( event );
+}
+
+bool wxRadioButton::Create( wxWindow *parent, wxWindowID id, const wxString& label,
+ const wxPoint& pos, const wxSize& size, long style,
+ const wxValidator& validator, const wxString& name )
+{
+ m_needParent = TRUE;
+
+ wxSize newSize = size;
+
+ PreCreation( parent, id, pos, newSize, style, name );
+
+ SetValidator( validator );
+
+ m_widget = gtk_radio_button_new_with_label( (GSList *) NULL, label );
+
+ SetLabel(label);
+
+ if (newSize.x == -1) newSize.x = 22+gdk_string_measure( m_widget->style->font, label );
+ if (newSize.y == -1) newSize.y = 26;
+ SetSize( newSize.x, newSize.y );
+
+ gtk_signal_connect( GTK_OBJECT(m_widget), "clicked",
+ GTK_SIGNAL_FUNC(gtk_radiobutton_clicked_callback), (gpointer*)this );
+
+ PostCreation();
+
+ Show( TRUE );
+
+ return TRUE;
+}
+
+void wxRadioButton::SetLabel( const wxString& label )
+{
+ wxControl::SetLabel( label );
+ GtkButton *bin = GTK_BUTTON( m_widget );
+ GtkLabel *g_label = GTK_LABEL( bin->child );
+ gtk_label_set( g_label, GetLabel() );
+}
+
+void wxRadioButton::SetValue( bool val )
+{
+ gtk_toggle_button_set_state( GTK_TOGGLE_BUTTON(m_widget), val );
+}
+
+bool wxRadioButton::GetValue(void) const
+{
+ return GTK_TOGGLE_BUTTON(m_widget)->active;
+}
+
+void wxRadioButton::Enable( bool enable )
+{
+ wxControl::Enable( enable );
+ GtkButton *bin = GTK_BUTTON( m_widget );
+ GtkWidget *label = bin->child;
+ gtk_widget_set_sensitive( label, enable );
+}
+
+void wxRadioButton::SetFont( const wxFont &font )
+{
+ if (((wxFont*)&font)->Ok())
+ m_font = font;
+ else
+ m_font = *wxSWISS_FONT;
+
+ GtkButton *bin = GTK_BUTTON( m_widget );
+ GtkWidget *label = bin->child;
+
+ GtkStyle *style = (GtkStyle*) NULL;
+ if (!m_hasOwnStyle)
+ {
+ m_hasOwnStyle = TRUE;
+ style = gtk_style_copy( gtk_widget_get_style( label ) );
+ }
+ else
+ {
+ style = gtk_widget_get_style( label );
+ }
+
+ gdk_font_unref( style->font );
+ style->font = gdk_font_ref( m_font.GetInternalFont( 1.0 ) );
+
+ gtk_widget_set_style( label, style );
+}
+