- Add event paramenter

- Implement Paging control

examples/widgetapp/demo_datasource.e

@@ -9,7 +9,7 @@ class
 
 inherit
 
-	WSF_DATASOURCE [DEMO_DATA]
+	WSF_PAGABLE_DATASOURCE [DEMO_DATA]
 
 create
 	make_demo
@@ -28,11 +28,12 @@ feature
 		do
 			create list.make
 			across
-				((page - 1) * page_size) |..| (page * page_size - 1) as c
+				((page - 1) * page_size) |..| (page * page_size - 1).min(131) as c
 			loop
 				list.extend (create {DEMO_DATA}.make (c.item, "Name" + c.item.out, "desc " + c.item.out))
 			end
 			Result := list
+			row_count:=132
 		end
 
 end