Example #1
0
File: app.c Project: gensym/shoes
shoes_code
shoes_app_wheel(shoes_app *app, ID dir, int x, int y)
{
  shoes_canvas *canvas;
  Data_Get_Struct(app->canvas, shoes_canvas, canvas);
  if (canvas->slot->vscroll)
  {
    if (dir == s_up)
      shoes_slot_scroll_to(canvas, -16, 1);
    else if (dir == s_down)
      shoes_slot_scroll_to(canvas, 16, 1);
  }
  shoes_canvas_send_wheel(app->canvas, dir, x, y);
  return SHOES_OK;
}
Example #2
0
VALUE
shoes_canvas_set_scroll_top(VALUE self, VALUE num)
{
  SETUP();
  shoes_slot_scroll_to(canvas, NUM2INT(num), 0);
  return num;
}