/* examples/misc/bulle2.c */

#include <helium.h>

He_node *princ, *canvas, *bulle;

void canvas_event (He_node *hn, He_event *hev)
{
    switch (hev->type) {
        case ButtonPress :
        case MotionNotify :
            if (hev->sb == 1) {
                char bla[80];
                sprintf (bla, "Bulle \nen %d,%d", hev->sx, hev->sy);
                HeSetBubbleLabel (bulle, bla);
                HeShowBubbleXYF (bulle, hn, hev->sx, hev->sy, FALSE);
            } 
            break;
        case ButtonRelease :
            if (hev->sb == 1)
                HeSetShow (bulle, FALSE);
            break;
    }
}

int main (int argc, char *argv[])
{
    HeInit (&argc, &argv);

    princ = HeCreateFrame ();
    HeSetFrameLabel (princ, "Bulle 2");
    
    canvas = HeCreateCanvas (princ);
    HeExpand (canvas, NULL, HE_BOTTOM_RIGHT);
    HeSetCanvasEventProc (canvas, canvas_event);
    
    bulle = HeCreateBubble ();
        
    return HeMainLoop (princ);
}