[GtkComboBox/OCaml] How to use ?

**prgasp77** · 19/08/2009, 09h15

Bonjour,
je code en Objective Caml et j'aimerais utiliser un GtkComboBox alias GEdit.combo_box pour lablGTK. Je ne trouve malheureusement aucune information sur Internet (rien hormis les méthodes de ladite classe).

Quelqu'un pourrait-il m'expliquer comment ceci fonctionne ? Merci.

**prgasp77** · 20/08/2009, 14h16

Bonjour,
j'ai fini par trouver comment faire. Mais il me semble qu'il n'existe réellement de documentation concernant GEdit.combo_box. Il m'a falu fouiller dans les rapports de bugs de lablgtk ...

Voici comment faire pour ceux qui trouverait ce post via une recherche :
Il existe une fonction GEdit.combo_box_text ~strings:strlist () créant une combo_box à partir de la string list strlist.
Voici ensuite comment manipuler ladite combo_box. Explication par exemples :

Code OCaml :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
(** Récupération de l'index de l'item sélectionné de combo **)
let combo_index combo =
   let combo_box,_ = combo in
   combo_box#active
   ;;
-> int
 
(** Récupération du texte de l'item selectionné de combo **)
let combo_text combo =
   let combo_box,((store:GTree.list_store),(column:string Gtree.column)) = combo in
   let first = store#get_iter_first in
   match first with
      | Some iter ->
         let index = ref combo_box#active in
         while !index>0 && store#iter_next iter do index := !index-1 done;
         if not (store#iter_is_valid iter)
         then None
         else Some (store#get ~row:iter ~column)
      | None -> None
   ;;
-> string option
 
(** Suppression des items du combo **)
let combo_clear combo =
   let _,((store:GTree.list_store),_) = combo in
   store#clear ()
   ;;
-> unit
 
(** Ajout d'une liste de string à postiori **)
let combo_add_strings combo strlist =
   let combo_box,((store:GTree.list_store),(column:string Gtree.column)) = combo in
   let fill label =
      let row = store#append () in
      store#set ~row ~column label
   in
   List.iter fill strlist;
   combo_box#set_active 0
   ;;
-> unit

Vous trouverez dans la doc générée tous les détails pour faire ce que vous voulez avec des combo_box simples (que du text).
Petit détail : widget utilisable qu'avec lablgtk2.4+

Bonne journée !

Ho, si quelqu'un sait comment activer la coloration synthaxique pour caml, qu'il me fasse signe !

**gege2061** · 20/08/2009, 14h25

Envoyé par prgasp77

Vous trouverez dans la doc générée tous les détails pour faire ce que vous voulez avec des combo_box simples (que du text).
Petit détail : widget utilisable qu'avec lablgtk2.4+

En fait les combo box sont basées sur le même modèle que les GtkTreeView : les GtkTreeModel.

En utilisant les fonctions suffixé par _text, GTK+ créé simplement un modèle avec une colonne de type texte.

Un tutoriel sur les tree view avec OCaml : http://plus.kaist.ac.kr/~shoh/ocaml/...view-tutorial/

Envoyé par prgasp77

Ho, si quelqu'un sait comment activer la coloration synthaxique pour caml, qu'il me fasse signe !

En utilisant [code=Caml] comme tu l'as fait, il semble juste y avoir un problème avec la coloration des commentaires

**prgasp77** · 20/08/2009, 16h05

Envoyé par gege2061

En fait les combo box sont basées sur le même modèle que les GtkTreeView : les GtkTreeModel.
[...]
Un tutoriel sur les tree view avec OCaml : http://plus.kaist.ac.kr/~shoh/ocaml/...view-tutorial/

Oui, je l'ai lu. Mais pour de simples GUIs, je trouve le système bien lourd. Il aurait été facile de créer une classe surcouche de GEdit.combo_box s'utilisant (pour l'utilisateur/programmeur) sans système Model/View/Controller ...
Il existe toujours les GEdit.combo, mais elles sont nettement moins belles, n'est-ce pas ?

**gege2061** · 20/08/2009, 16h14

Envoyé par prgasp77

Oui, je l'ai lu. Mais pour de simples GUIs, je trouve le système bien lourd. Il aurait été facile de créer une classe surcouche de GEdit.combo_box s'utilisant (pour l'utilisateur/programmeur) sans système Model/View/Controller ...

C'est justement le but de combo_box_text, simplifier l'utilisation lorsqu'on a besoin d'une liste déroulante avec du texte.

La doc de lablgtk ne semble pas complète, tu as toutes les fonctions dans la doc de GTK+ :

Envoyé par prgasp77

Il existe toujours les GEdit.combo, mais elles sont nettement moins belles, n'est-ce pas ?

Ce widget est obsolète, il est prévu de faire du vide dans les fonctions obsolètes (il est déjà possible de les supprimer lors de la compilation) donc très fortement déconseillé