Discussion :

[altharaz]

Bonjour,


j'utilise Ocaml depuis quelques temps pour représenter un nuage de points avec son maillage par triangulation de Delaunay.

Pour cela, j'utilise les classiques lineto, moveto, plot, etc.

J'utilise depuis peu Lablgtk2 et malgré les tutoriaux, je n'ai pas bien compris comment je pourrais faire la même chose avec lablgtk2, à savoir placer des points, tracer des traits, effacer une partie de l'écran, etc.

J'aurais pensé utiliser GMisc.drawing_area, mais si c'est le cas, comment ensuite placer des points et segments dessus?

Merci d'avance.

[SpiceGuid]

regarde dans les exemples de code fournis avec LablGtk.

voir aussi introduction_to_gtk

à l'aide de ce code

Code ocaml :

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

1
2
3
4
 
let da = GMisc.drawing_area ~packing:vbox#add () in
let drawable = new GDraw.drawable da#misc#window in
...

tu obtiens un objet GDraw.drawable, tu trace points et lignes à l'aide des méthodes drawable#point et drawable#line.

[altharaz]

Encore désolé, mais après avoir lu les tutoriaux en question, je n'ai toujours pas bien compris.

Je dois d'abord créer un GDraw.drawing_area, qui contiendra un GDraw.drawable, et c'est dans le drawable que je finirai par tracer?

[Cacophrene]

Bonjour !

Le widget GMisc.drawing_area n'est qu'une zone de dessin (comparable à la fenêtre qui s'affiche avec Graphics.open_graph). En général on effectue tous les tracés en arrière-plan dans un widget GDraw.pixmap (double buffering) grâce à GDraw.drawable qui est la boîte à outils pour les dessins. Il faut ensuite ajouter les événements adéquats pour maintenir l'affichage propre en cas de superposition de fenêtres. Voici deux liens qui devraient t'aider :

• Le principe du dessin avec LablGTK
• Un exemple : le module Drawing de mon programme MazeML

N'hésite pas à demander si tu as des questions précises.

Cordialement,
Cacophrène

[altharaz]

Je suis vraiment désolé hein c'est nouveau pour moi...

Donc si je récapitule, en tentant de comparer par rapport à Ocaml

On a le GMisc.drawing_area qui est à peu près comme la fenêtre d'open_graph.

On a ensuite GDraw.pixmap qui permet de tracer comme dans ocaml avant de faire syncronize ();

La commande plot est remplacée par la méthode point et lineto est remplacée par la méthode line et il faut les utiliser avec un GDraw.drawable?

Si oui, j'aimerais tracer un point rouge, et tracer une ligne rouge aussi.

Voici ce que j'ai mis dans mon programme:

Code :

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

1
2
3
4
5
6
  let graphique = GMisc.drawing_area ~packing: content#add () ~width:700 ~height:700 in
	let fenetre = new GDraw.drawable graphique#misc#window in
	let buffer = ref (GDraw.pixmap ~width:700 ~height:700 ()) in
	!buffer#set_foreground (`NAME "red");
	!buffer#line ~x:300 ~y:300 ~x:600 ~y:600;
	!buffer#point ~x:400 ~y:400;

J'ai pas encore compris comment faire l'équivalent d'un syncronize, mais si j'ai pigé le reste, là j'ai placé un point et une ligne dans mon écran en attente d'être tracé?

Seul bémol, quand je lance mon programme après l'avoir compilé, j'ai une FATAL ERROR:
exception Gpointer.Null

[Alp]

Je te conseille de te renseigner sur le projet plplot.