Looked for coordinates using the new addresses definitions.

git-svn-id: svn://svn.gna.org/svn/chrysalide/trunk@394 abbe820e-26c8-41b2-8c08-b7b2b41f8b0a

1 files changed, 39 insertions, 0 deletions

diff --git a/src/gtkext/easygtk.c b/src/gtkext/easygtk.c
index fb623ab..d4f01e3 100644
--- a/src/gtkext/easygtk.c
+++ b/src/gtkext/easygtk.c
@@ -477,6 +477,45 @@ GtkWidget *qck_create_check_button(GObject *object, const char *name, const char
 *                                                                             *
 *  Paramètres  : object  = espace dédié à l'inscription de références.        *
 *                name    = nom à donner au nouveau composant.                 *
+*                caption = désignation apparaîssant sur le corps de l'objet.  *
+*                member  = membre de la liste des autres boutons.             *
+*                handler = éventuelle fonction de sélection associée.         *
+*                data    = données à transmettre avec l'événement si besoin.  *
+*                                                                             *
+*  Description : Crée et enregistre un composant 'GtkRadioButton'.            *
+*                                                                             *
+*  Retour      : Composant mis en place.                                      *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+GtkWidget *qck_create_radio_button(GObject *object, const char *name, const char *caption, GtkRadioButton *member, GCallback handler, gpointer data)
+{
+    GtkWidget *result;                      /* Résultat à renvoyer         */
+
+	result = gtk_radio_button_new_with_label_from_widget(member, caption);
+
+    if (G_IS_OBJECT(object) && name != NULL)
+    {
+        g_object_ref(G_OBJECT(result));
+        g_object_set_data_full(object, name, result, (GDestroyNotify)g_object_unref);
+    }
+
+    gtk_widget_show(result);
+
+    if (handler != NULL)
+        g_signal_connect(result, "toggled", handler, data);
+
+	return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : object  = espace dédié à l'inscription de références.        *
+*                name    = nom à donner au nouveau composant.                 *
 *                handler = éventuelle fonction de sélection associée.         *
 *                data    = données à transmettre avec l'événement si besoin.  *
 *                                                                             *