virtual void handleMouseDown( const Evasxx::MouseDownEvent& e )
 {
   cout << "PA::mouseDown" << endl;
   mouseDown = true;
   Evasxx::Object* l = new Evasxx::Rectangle( mEvas, Rect (e.data->canvas.x, e.data->canvas.y, 2, 2) );
   int b=200+(int) (55.0*rand()/(RAND_MAX+1.0));
   l->setColor( Color (b, b, b, 255) );
   l->show();
 }

 virtual void handleMouseMove( const Evasxx::MouseMoveEvent& e )
 {
   cout << "PA::mouseMove" << endl;
   if ( mouseDown )
   {
     int width = 2 + abs( e.data->cur.canvas.x - e.data->prev.canvas.x );
     int height = 2 + abs( e.data->cur.canvas.y - e.data->prev.canvas.y );
     cout << "width = " << width << ", height = " << height << endl;
     Evasxx::Object* l = new Evasxx::Rectangle( mEvas, Rect (e.data->cur.canvas.x - width/2, e.data->cur.canvas.y - height/2, width, height) );
     int b=200+(int) (55.0*rand()/(RAND_MAX+1.0));
     l->setColor( Color (b, b, b, 255) );
     l->show();
   }
 }

void Object::setContent (const Evasxx::Object &content)
{
  elm_object_part_content_set(o, NULL, content.obj());
}

Window::Window (Evasxx::Object &parent, const std::string &name, Elm_Win_Type type)
{
  o = elm_win_add (parent.obj (), name.c_str (), type);
  
  elmInit ();
}

Label::Label (Evasxx::Object &parent)
{
    o = elm_label_add (parent.obj ());

    elmInit ();
}

void Bubble::setIcon (const Evasxx::Object &icon)
{
  elm_bubble_icon_set (o, icon.obj ());
}

void Bubble::setContent (const Evasxx::Object &content)
{
  elm_bubble_content_set (o, content.obj ());
}

void Scroller::setContent (Evasxx::Object &child)
{
  elm_object_content_set (o, child.obj ());
}

Slider::Slider (Evasxx::Object &parent)
{
  o = elm_slider_add (parent.obj ());
  
  elmInit ();
}

Image::Image (Evasxx::Object &parent)
{
  o = elm_image_add (parent.obj ());
  
  elmInit ();
}

void Frame::setContent (const Evasxx::Object &content)
{
  elm_object_content_set (o, content.obj ());
}

Frame::Frame (Evasxx::Object &parent)
{
  o = elm_frame_add (parent.obj ());
  
  elmInit ();
}

void Progressbar::setIcon (Evasxx::Object &icon)
{
  elm_progressbar_icon_set (o, icon.obj ());
}

Progressbar::Progressbar (Evasxx::Object &parent)
{
  o = elm_progressbar_add (parent.obj ());
  
  elmInit ();
}

Scroller::Scroller (Evasxx::Object &parent)
{
  o = elm_scroller_add (parent.obj ());
  
  elmInit ();
}

Button::Button (Evasxx::Object &parent)
{
  o = elm_button_add (parent.obj ());
  
  elmInit ();
}

Bubble::Bubble (Evasxx::Object &parent)
{
  o = elm_bubble_add (parent.obj ());
  
  elmInit ();
}