Enlightenment CVS committal

Author  : jethomas
Project : e17
Module  : libs/ewl

Dir     : e17/libs/ewl/src/bin/tests/kinetic_scrollpane


Modified Files:
        ewl_kinetic_scrollpane_test.c 


Log Message:
Add another kinetic scrolling style - more like the iphone.

===================================================================
RCS file: 
/cvs/e/e17/libs/ewl/src/bin/tests/kinetic_scrollpane/ewl_kinetic_scrollpane_test.c,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -3 -r1.1 -r1.2
--- ewl_kinetic_scrollpane_test.c       20 Jan 2008 05:06:12 -0000      1.1
+++ ewl_kinetic_scrollpane_test.c       7 Feb 2008 20:15:30 -0000       1.2
@@ -3,11 +3,15 @@
 #include "ewl_test_private.h"
 #include "ewl_tree.h"
 #include "ewl_label.h"
+#include "ewl_border.h"
+#include "ewl_paned.h"
 
 #include <stdio.h>
+#include <stdlib.h>
 #include <string.h>
 
 static int create_test(Ewl_Container *box);
+static void destroy_test(Ewl_Widget *w, void *ev, void *data);
 
 void
 test_info(Ewl_Test *test)
@@ -19,28 +23,43 @@
        test->type = EWL_TEST_TYPE_CONTAINER;
 }
 
+static void destroy_test(Ewl_Widget *w, void *ev, void *data)
+{
+       ecore_list_destroy(data);
+}
+
 static int
 create_test(Ewl_Container *box)
 {
-       Ewl_Widget *tree;
+       Ewl_Widget *tree, *o, *c;
        Ewl_Model *model;
        Ewl_View *view;
        Ecore_List *data;
        int i;
 
        data = ecore_list_new();
+       ecore_list_free_cb_set(data, ECORE_FREE_CB(free));
+       ewl_callback_append(EWL_WIDGET(box), EWL_CALLBACK_DESTROY, 
destroy_test, data);
        for (i = 0; i < 500; i++)
        {
-               char text[15];
+               char text[10];
 
                snprintf(text, sizeof(text), "Row: %d", i);
                ecore_list_append(data, strdup(text));
        }
 
+       c = ewl_vpaned_new();
+       ewl_container_child_append(box, c);
+       ewl_widget_show(c);
 
        model = ewl_model_ecore_list_get();
        view = ewl_label_view_get();
 
+       o = ewl_border_new();
+       ewl_border_label_set(EWL_BORDER(o), "Normal Scrolling");
+       ewl_container_child_append(EWL_CONTAINER(c), o);
+       ewl_widget_show(o);
+
        tree = ewl_tree_new();
        ewl_tree_headers_visible_set(EWL_TREE(tree), FALSE);
        ewl_tree_fixed_rows_set(EWL_TREE(tree), TRUE);
@@ -50,7 +69,25 @@
        ewl_mvc_model_set(EWL_MVC(tree), model);
        ewl_mvc_view_set(EWL_MVC(tree), view);
        ewl_mvc_data_set(EWL_MVC(tree), data);
-       ewl_container_child_append(box, tree);
+       ewl_container_child_append(EWL_CONTAINER(o), tree);
+       ewl_widget_show(tree);
+
+       o = ewl_border_new();
+       ewl_border_label_set(EWL_BORDER(o), "Embeded Type Scrolling");
+       ewl_container_child_append(EWL_CONTAINER(c), o);
+       ewl_widget_show(o);
+
+       tree = ewl_tree_new();
+       ewl_tree_headers_visible_set(EWL_TREE(tree), FALSE);
+       ewl_tree_fixed_rows_set(EWL_TREE(tree), TRUE);
+       ewl_tree_kinetic_scrolling_set(EWL_TREE(tree), 
EWL_KINETIC_SCROLL_EMBEDDED);
+       ewl_tree_kinetic_fps_set(EWL_TREE(tree), 30);
+       ewl_tree_kinetic_dampen_set(EWL_TREE(tree), 0.99);
+       ewl_tree_column_count_set(EWL_TREE(tree), 1);
+       ewl_mvc_model_set(EWL_MVC(tree), model);
+       ewl_mvc_view_set(EWL_MVC(tree), view);
+       ewl_mvc_data_set(EWL_MVC(tree), data);
+       ewl_container_child_append(EWL_CONTAINER(o), tree);
        ewl_widget_show(tree);
 
        return 1;



-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs

Reply via email to