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; }
VALUE shoes_canvas_set_scroll_top(VALUE self, VALUE num) { SETUP(); shoes_slot_scroll_to(canvas, NUM2INT(num), 0); return num; }