X-Git-Url: http://git.tdb.fi/?a=blobdiff_plain;f=source%2Flist.cpp;h=a5285832b98994f5f9cc4365d41c28c5b37b1176;hb=7e328215742ee672b1a93e5f5f358828c53ce921;hp=5665ef5dc264391f7020005d5635be43c30009d8;hpb=af13797a82b242a3cd8fdd405b057a9e311631ac;p=libs%2Fgltk.git

diff --git a/source/list.cpp b/source/list.cpp
index 5665ef5..a528583 100644
--- a/source/list.cpp
+++ b/source/list.cpp
@@ -1,16 +1,13 @@
-/* $Id$
-
-This file is part of libmspgltk
-Copyright © 2007  Mikko Rasa, Mikkosoft Productions
-Distributed under the LGPL
-*/
-
+#include <msp/core/raii.h>
+#include <msp/debug/demangle.h>
 #include <msp/gl/matrix.h>
-#include <msp/gl/transform.h>
+#include <msp/gl/meshbuilder.h>
+#include <msp/input/keys.h>
 #include "graphic.h"
 #include "list.h"
 #include "part.h"
 #include "style.h"
+#include "text.h"
 #include "vslider.h"
 
 using namespace std;
@@ -18,248 +15,668 @@ using namespace std;
 namespace Msp {
 namespace GLtk {
 
-List::List(const Resources &r):
-	Widget(r),
-	sel_index(-1),
-	first(0),
-	n_visible(1),
-	items_part(0),
-	slider(new VSlider(res)),
-	slider_active(false)
+incompatible_data::incompatible_data(const type_info &ti):
+	logic_error("expected "+Debug::demangle(ti.name()))
+{ }
+
+
+List::List():
+	data(new BasicListData<string>),
+	own_data(true)
+{
+	init();
+}
+
+List::List(ListData &d):
+	data(&d),
+	own_data(false)
 {
-	slider->set_step(1);
-	slider->signal_value_changed.connect(sigc::mem_fun(this, &List::slider_value_changed));
+	init();
+}
 
-	update_style();
+void List::init()
+{
+	input_type = INPUT_NAVIGATION;
+
+	item_factory = 0;
+	sel_index = -1;
+	focus_index = -1;
+	first_row = 0;
+	max_scroll = 0;
+	view_rows = 5;
+	items_part = 0;
+	ignore_slider_change = false;
+	dragging = false;
+	drag_start_x = 0;
+	drag_start_y = 0;
+
+	observer = new DataObserver(*this);
+
+	add(slider);
+	slider.set_step(1);
+	slider.signal_value_changed.connect(sigc::mem_fun(this, &List::slider_value_changed));
 }
 
 List::~List()
 {
-	delete slider;
+	delete item_factory;
+	delete observer;
+	if(own_data)
+		delete data;
+}
+
+void List::autosize_special(const Part &part, Geometry &ageom) const
+{
+	if(part.get_name()=="items")
+	{
+		const Sides &margin = part.get_margin();
+
+		unsigned max_w = 0;
+		unsigned max_h = 0;
+		for(unsigned i=0; i<items.size(); ++i)
+		{
+			Geometry igeom;
+			items[i]->autosize(igeom);
+			max_w = max(max_w, igeom.w);
+			max_h = max(max_h, igeom.h);
+		}
+
+		unsigned total_h = max_h*(view_rows==0 ? items.size() : view_rows);
+
+		ageom.w = max(ageom.w, max_w+margin.left+margin.right);
+		ageom.h = max(ageom.h, total_h+margin.top+margin.bottom);
+	}
+	else if(part.get_name()=="slider")
+		autosize_child(slider, part, ageom);
+}
+
+void List::set_data(ListData &d)
+{
+	if(item_factory)
+		item_factory->set_data(d);
+
+	delete observer;
+	if(own_data)
+		delete data;
+
+	data = &d;
+	own_data = false;
+	observer = new DataObserver(*this);
+
+	for(vector<Item *>::iterator i=items.begin(); i!=items.end(); ++i)
+		delete *i;
+	items.clear();
+	unsigned n_items = data->size();
+	for(unsigned i=0; i<n_items; ++i)
+	{
+		Item *item = create_item(i);
+		items.push_back(item);
+	}
+
+	items_changed();
 }
 
-void List::append(const string &v)
+void List::items_changed()
 {
-	items.push_back(v);
-	recalculate_parameters();
+	signal_autosize_changed.emit();
+	rebuild();
 }
 
-void List::insert(unsigned i, const string &v)
+List::Item *List::create_item(unsigned index)
 {
-	if(i>items.size())
-		throw InvalidParameterValue("Index out of range");
+	Item *item = 0;
+	if(item_factory)
+		item = item_factory->create_item(index);
+	else
+		item = new BasicItem(data->get_string(index));
+	if(static_cast<int>(index)==sel_index)
+		item->set_active(true);
+	add(*item);
+	item->autosize();
+	item->signal_autosize_changed.connect(sigc::bind(sigc::mem_fun(this, &List::item_autosize_changed), item));
+	return item;
+}
 
-	items.insert(items.begin()+i, v);
-	recalculate_parameters();
+void List::set_view_size(unsigned r)
+{
+	view_rows = r;
+	signal_autosize_changed.emit();
 }
 
-void List::remove(unsigned i)
+void List::set_view_all()
 {
-	if(i>items.size())
-		throw InvalidParameterValue("Index out of range");
+	set_view_size(0);
+}
 
-	items.erase(items.begin()+i);
-	if(sel_index>static_cast<int>(i))
-		--sel_index;
-	else if(sel_index==static_cast<int>(i))
-		sel_index=-1;
+void List::set_selected_index(int i)
+{
+	if(i>=static_cast<int>(data->size()))
+		throw out_of_range("List::set_selected_index");
+
+	if(i==sel_index || (i<0 && sel_index<0))
+		return;
 
-	recalculate_parameters();
+	if(sel_index>=0)
+		items[sel_index]->set_active(false);
+	if(i<0)
+	{
+		sel_index = -1;
+		focus_index = -1;
+		set_input_focus(0);
+		signal_selection_cleared.emit();
+	}
+	else
+	{
+		sel_index = i;
+		focus_index = i;
+		items[sel_index]->set_active(true);
+		if(state&FOCUS)
+			set_input_focus(items[focus_index]);
+		signal_item_selected.emit(sel_index);
+	}
 }
 
-void List::clear()
+void List::set_selected_item(Widget *item)
 {
-	items.clear();
-	sel_index=-1;
+	for(unsigned i=rows[first_row].first; (i<items.size() && items[i]->is_visible()); ++i)
+		if(item==items[i])
+			return set_selected_index(i);
+}
+
+void List::rebuild_special(const Part &part)
+{
+	if(part.get_name()=="slider")
+		reposition_child(slider, part);
+	else if(part.get_name()=="items")
+	{
+		SetFlag flag(ignore_slider_change);
+		reposition_items(true);
+		unsigned old_first_row = first_row;
+		unsigned old_max_scroll = max_scroll;
+		check_view_range();
+		if(first_row!=old_first_row || max_scroll!=old_max_scroll)
+			reposition_items(false);
+	}
+
+	Widget::rebuild_special(part);
+}
+
+void List::render_special(const Part &part, GL::Renderer &renderer) const
+{
+	if(part.get_name()=="items")
+	{
+		for(unsigned i=rows[first_row].first; (i<items.size() && items[i]->is_visible()); ++i)
+			items[i]->render(renderer);
+	}
+	else if(part.get_name()=="slider")
+		slider.render(renderer);
 }
 
-const string &List::get_selected() const
+bool List::key_press(unsigned key, unsigned mod)
 {
-	if(sel_index<0)
-		throw InvalidState("No selection");
+	if(key==Input::KEY_UP && mod==MOD_CTRL)
+		move_focus(NAV_UP, false);
+	else if(key==Input::KEY_DOWN && mod==MOD_CTRL)
+		move_focus(NAV_DOWN, false);
+	else
+		return false;
 
-	return items[sel_index];
+	return true;
 }
 
 void List::button_press(int x, int y, unsigned btn)
 {
-	if(slider->get_geometry().is_inside(x, y))
+	if(btn==4 || btn==5)
 	{
-		const Geometry &sgeom=slider->get_geometry();
-		slider->button_press(x-sgeom.x, y-sgeom.y, btn);
-		slider_active=true;
+		unsigned change = 3;
+		if(btn==4)
+		{
+			change = min(first_row, change);
+			slider.set_value(max_scroll-(first_row-change));
+		}
+		else if(btn==5)
+		{
+			change = min(max_scroll-first_row, change);
+			slider.set_value(max_scroll-(first_row+change));
+		}
 	}
-	else if(btn==1)
+	else
 	{
-		const GL::Font *const font=style->get_font();
-		const unsigned row_height=static_cast<unsigned>(font->get_default_size());
+		Container::button_press(x, y, btn);
+		if(click_focus && btn==1)
+			set_selected_item(click_focus);
+	}
+}
 
-		if(items_part)
-			y+=items_part->get_margin().top;
+void List::touch_press(int x, int y, unsigned finger)
+{
+	if(finger==0)
+	{
+		dragging = true;
+		drag_start_x = x;
+		drag_start_y = y;
+	}
+}
 
-		unsigned i=(geom.h-1-y)/row_height;
-		if(i<n_visible && first+i<items.size())
+void List::touch_release(int x, int y, unsigned finger)
+{
+	if(finger==0)
+	{
+		int dx = x-drag_start_x;
+		int dy = y-drag_start_y;
+		if(dx*dx+dy*dy<25)
 		{
-			sel_index=first+i;
+			Container::touch_press(drag_start_x, drag_start_y, finger);
+			if(touch_focus)
+				set_selected_item(touch_focus);
+			Container::touch_motion(x, y, finger);
+			Container::touch_release(x, y, finger);
+		}
+		dragging = false;
+	}
+}
 
-			signal_item_selected.emit(sel_index, items[sel_index]);
+void List::touch_motion(int, int y, unsigned finger)
+{
+	if(finger==0 && !items.empty() && dragging)
+	{
+		int dy = y-drag_start_y;
+		if(dy>0 && first_row<max_scroll)
+		{
+			int row_h = rows[first_row].height;
+			if(dy>row_h)
+			{
+				drag_start_y += row_h;
+				slider.set_value(max_scroll-(first_row+1));
+			}
+		}
+		else if(dy<0 && first_row>0)
+		{
+			int row_h = rows[first_row-1].height;
+			if(-dy>row_h)
+			{
+				drag_start_y -= row_h;
+				slider.set_value(max_scroll-(first_row-1));
+			}
 		}
 	}
 }
 
-void List::button_release(int x, int y, unsigned btn)
+void List::focus_in()
 {
-	if(slider_active)
+	Container::focus_in();
+	if(focus_index>=0 && items[focus_index]->is_visible())
+		set_input_focus(items[focus_index]);
+	else
 	{
-		const Geometry &sgeom=slider->get_geometry();
-		slider->button_release(x-sgeom.x, y-sgeom.y, btn);
-		slider_active=false;
+		if(sel_index>=0 && items[sel_index]->is_visible())
+			set_focus_index(sel_index);
+		else if(!items.empty())
+			set_focus_index(rows[first_row].first);
 	}
 }
 
-void List::pointer_motion(int x, int y)
+bool List::navigate(Navigation nav)
 {
-	if(slider_active)
+	if((nav==NAV_UP || nav==NAV_DOWN) && !items.empty())
+		move_focus(nav, true);
+	else if(nav==NAV_ACTIVATE)
+		set_selected_index(focus_index);
+	else
+		return false;
+
+	return true;
+}
+
+void List::on_style_change()
+{
+	items_part = (style ? style->get_part("items") : 0);
+}
+
+void List::move_focus(Navigation nav, bool select)
+{
+	if(nav==NAV_UP)
+	{
+		if(focus_index>0)
+			set_focus_index(focus_index-1);
+	}
+	else if(nav==NAV_DOWN)
 	{
-		const Geometry &sgeom=slider->get_geometry();
-		slider->pointer_motion(x-sgeom.x, y-sgeom.y);
+		if(static_cast<unsigned>(focus_index+1)<items.size())
+			set_focus_index(focus_index+1);
 	}
+
+	if(select)
+		set_selected_index(focus_index);
 }
 
-void List::render_special(const Part &part) const
+void List::set_focus_index(int i)
 {
-	if(part.get_name()=="items")
+	focus_index = i;
+	if(focus_index>=0)
 	{
-		const GL::Font *const font=style->get_font();
-		const float font_size=font->get_default_size();
-		const unsigned row_height=static_cast<unsigned>(font_size);
-		const Sides &margin=part.get_margin();
+		scroll_to_focus();
+		if(state&FOCUS)
+			set_input_focus(items[focus_index]);
+	}
+}
 
-		Geometry pgeom=geom;
-		pgeom.h=row_height;
+void List::item_autosize_changed(Item *item)
+{
+	item->autosize();
+	signal_autosize_changed.emit();
+	rebuild();
+}
 
-		for(unsigned i=0; (i<n_visible && first+i<items.size()); ++i)
-		{
-			Geometry rgeom;
-			rgeom.w=static_cast<unsigned>(font->get_string_width(items[first+i])*font_size);
-			rgeom.h=static_cast<unsigned>((font->get_ascent()-font->get_descent())*font_size);
-			rgeom.y=geom.h-margin.top-(i+1)*row_height-static_cast<int>(font->get_descent()*font_size);
-			part.get_alignment().apply(rgeom, pgeom);
-
-			GL::push_matrix();
-			GL::translate(rgeom.x, rgeom.y, 0);
-			GL::scale_uniform(font_size);
-			font->draw_string(items[first+i]);
-			GL::pop_matrix();
-		}
+void List::reposition_items(bool record_rows)
+{
+	if(!items_part)
+		return;
+
+	if(record_rows)
+	{
+		rows.clear();
+		rows.push_back(0);
 	}
-	else if(part.get_name()=="selection")
+
+	const Sides &margin = items_part->get_margin();
+	unsigned view_w = geom.w-min(geom.w, margin.left+margin.right);
+	unsigned y = 0;
+	unsigned row_h = 0;
+	for(unsigned i=0; i<items.size(); ++i)
 	{
-		if(sel_index>=static_cast<int>(first) && sel_index<static_cast<int>(first+n_visible))
+		const Geometry &igeom = items[i]->get_geometry();
+
+		if(y)
+			y -= row_h;
+		if(record_rows && i>0)
 		{
-			const GL::Font *const font=style->get_font();
-			const float font_size=font->get_default_size();
-			const unsigned row_height=static_cast<unsigned>(font_size);
-			const Sides &margin=part.get_margin();
-
-			Geometry pgeom=geom;
-			pgeom.h=row_height;
-			pgeom.w-=margin.left+margin.right;
-
-			Geometry rgeom=part.get_geometry();
-			rgeom.y+=geom.h-margin.top-row_height*(sel_index-first+1);
-			rgeom.x+=margin.left;
-			part.get_alignment().apply(rgeom, pgeom);
-
-			GL::push_matrix();
-			GL::translate(rgeom.x, rgeom.y, 0);
-			part.get_graphic(state)->render(rgeom.w, rgeom.h);
-			GL::pop_matrix();
+			rows.back().height = row_h;
+			rows.push_back(i);
 		}
+		row_h = 0;
+
+		if(first_row<rows.size() && i==rows[first_row].first)
+			y = geom.h-min(geom.h, margin.top);
+
+		if(!y)
+			items[i]->set_visible(false);
+		else if(igeom.h+margin.bottom<=y)
+		{
+			items[i]->set_visible(true);
+			items[i]->set_geometry(Geometry(margin.left, y-igeom.h, view_w, igeom.h));
+		}
+		else
+		{
+			for(unsigned j=rows.back().first; j<=i; ++j)
+				items[j]->set_visible(false);
+			y = 0;
+		}
+
+		row_h = max(row_h, igeom.h);
 	}
-	else if(part.get_name()=="slider")
-		slider->render();
+
+	if(record_rows)
+		rows.back().height = row_h;
+}
+
+unsigned List::last_to_first_row(unsigned last) const
+{
+	if(!items_part)
+		return last;
+
+	const Sides &margin = items_part->get_margin();
+	unsigned view_h = geom.h-min(geom.h, margin.top+margin.bottom);
+
+	unsigned items_h = 0;
+	for(unsigned i=last; i<rows.size(); --i)
+	{
+		items_h += rows[i].height;
+		if(items_h>view_h)
+			return min(i+1, last);
+	}
+
+	return 0;
 }
 
-void List::on_geometry_change()
+unsigned List::item_index_to_row(unsigned index) const
 {
-	reposition_slider();
+	for(unsigned i=0; i+1<rows.size(); ++i)
+		if(rows[i+1].first>index)
+			return i;
+	return rows.size()-1;
+}
+
+void List::check_view_range()
+{
+	if(!style)
+		return;
+
+	if(items.empty())
+		max_scroll = 0;
+	else
+		max_scroll = last_to_first_row(rows.size()-1);
+
+	if(first_row>max_scroll)
+		first_row = max_scroll;
 
-	recalculate_parameters();
+	slider.set_range(0, max_scroll);
+	slider.set_value(max_scroll-first_row);
 }
 
-void List::on_style_change()
+void List::scroll_to_focus()
 {
-	reposition_slider();
+	if(focus_index<0 || items[focus_index]->is_visible())
+		return;
 
-	items_part=0;
-	for(list<Part>::const_iterator i=style->get_parts().begin(); i!=style->get_parts().end(); ++i)
-		if(i->get_name()=="items")
-			items_part=&*i;
+	unsigned focus_row = item_index_to_row(static_cast<unsigned>(focus_index));
+	if(focus_row<first_row)
+		slider.set_value(max_scroll-focus_row);
+	else
+		slider.set_value(max_scroll-last_to_first_row(focus_row));
+}
 
-	recalculate_parameters();
+void List::slider_value_changed(double value)
+{
+	if(max_scroll>0 && !ignore_slider_change)
+	{
+		first_row = max_scroll-static_cast<unsigned>(value);
+		rebuild();
+	}
 }
 
-void List::reposition_slider()
+void List::adjust_index(int &index, int pos, int change)
+{
+	if(index>pos)
+		index += change;
+	else if(index==pos)
+		index = (change>0 ? index+change : -1);
+}
+
+
+List::DataObserver::DataObserver(List &l):
+	list(l)
 {
-	for(list<Part>::const_iterator i=style->get_parts().begin(); i!=style->get_parts().end(); ++i)
-		if(i->get_name()=="slider")
+	list.data->signal_item_added.connect(sigc::mem_fun(this, &DataObserver::item_added));
+	list.data->signal_item_removed.connect(sigc::mem_fun(this, &DataObserver::item_removed));
+	list.data->signal_cleared.connect(sigc::mem_fun(this, &DataObserver::cleared));
+	list.data->signal_refresh_item.connect(sigc::mem_fun(this, &DataObserver::refresh_item));
+}
+
+void List::DataObserver::item_added(unsigned i)
+{
+	adjust_index(list.sel_index, i, 1);
+	adjust_index(list.focus_index, i, 1);
+
+	Item *item = list.create_item(i);
+	list.items.insert(list.items.begin()+i, item);
+	list.items_changed();
+}
+
+void List::DataObserver::item_removed(unsigned i)
+{
+	bool had_selection = (list.sel_index>=0);
+	adjust_index(list.sel_index, i, -1);
+	adjust_index(list.focus_index, i, -1);
+
+	delete list.items[i];
+	list.items.erase(list.items.begin()+i);
+	list.items_changed();
+
+	if(had_selection && list.sel_index<0)
+		list.signal_selection_cleared.emit();
+}
+
+void List::DataObserver::cleared()
+{
+	list.sel_index = -1;
+	list.focus_index = -1;
+	for(vector<Item *>::iterator i=list.items.begin(); i!=list.items.end(); ++i)
+		delete *i;
+	list.items.clear();
+	list.items_changed();
+
+	list.signal_selection_cleared.emit();
+}
+
+void List::DataObserver::refresh_item(unsigned i)
+{
+	delete list.items[i];
+	// Avoid stale pointer while create_item is executing
+	list.items[i] = 0;
+	list.items[i] = list.create_item(i);
+	list.items_changed();
+}
+
+
+void List::Item::autosize_special(const Part &part, Geometry &ageom) const
+{
+	if(part.get_name()=="children")
+	{
+		const Sides &margin = part.get_margin();
+		for(list<Child *>::const_iterator i=children.begin(); i!=children.end(); ++i)
 		{
-			Geometry sgeom=i->get_geometry();
-			i->get_alignment().apply(sgeom, geom, i->get_margin());
-			slider->set_geometry(sgeom);
+			Geometry cgeom;
+			(*i)->widget->autosize(cgeom);
+			ageom.w = max(ageom.w, cgeom.x+cgeom.w+margin.right);
+			ageom.h = max(ageom.h, cgeom.y+cgeom.h+margin.top);
 		}
+	}
 }
 
-void List::recalculate_parameters()
+void List::Item::set_active(bool a)
 {
-	const GL::Font *font=style->get_font();
-	unsigned row_height=static_cast<unsigned>(font->get_default_size());
+	set_state(ACTIVE, (a ? ACTIVE : NORMAL));
+}
 
-	unsigned h=geom.h;
-	if(items_part)
+void List::Item::render_special(const Part &part, GL::Renderer &renderer) const
+{
+	if(part.get_name()=="children")
 	{
-		const Sides &margin=items_part->get_margin();
-		h-=margin.top+margin.bottom;
+		for(list<Child *>::const_iterator i=children.begin(); i!=children.end(); ++i)
+			(*i)->widget->render(renderer);
 	}
+}
+
 
-	n_visible=h/row_height;
+void List::SimpleItem::on_style_change()
+{
+	if(!style || children.empty())
+		return;
 
-	if(first+n_visible>items.size())
+	Widget *child = children.front()->widget;
+	child->autosize();
+	if(const Part *part = style->get_part("children"))
 	{
-		if(items.size()>n_visible)
-			first=items.size()-n_visible;
-		else
-			first=0;
+		const Sides &margin = part->get_margin();
+		child->set_position(margin.left, margin.bottom);
 	}
+}
+
 
-	if(items.size()>n_visible)
+void List::MultiColumnItem::check_widths(vector<unsigned> &widths) const
+{
+	if(widths.size()<children.size())
+		widths.resize(children.size(), 0);
+
+	unsigned n = 0;
+	for(list<Child *>::const_iterator i=children.begin(); i!=children.end(); ++i, ++n)
 	{
-		slider->set_range(0, items.size()-n_visible);
-		slider->set_value(items.size()-n_visible-first);
+		Geometry cgeom;
+		(*i)->widget->autosize(cgeom);
+		// TODO invent a better way to specify spacings
+		widths[n] = max(widths[n], cgeom.w+8);
 	}
-	else
+}
+
+void List::MultiColumnItem::set_widths(const vector<unsigned> &widths)
+{
+	if(!style)
+		return;
+
+	const Part *part = style->get_part("children");
+	if(!part)
+		return;
+
+	const Sides &margin = part->get_margin();
+	int x = margin.left;
+	unsigned n = 0;
+	for(list<Child *>::const_iterator i=children.begin(); i!=children.end(); ++i, ++n)
 	{
-		slider->set_range(0, 0);
-		slider->set_value(0);
+		(*i)->widget->set_position(x, margin.bottom);
+		x += widths[n];
 	}
 }
 
-void List::slider_value_changed(double value)
+void List::MultiColumnItem::on_style_change()
+{
+	if(!style)
+		return;
+
+	for(std::list<Child *>::const_iterator i=children.begin(); i!=children.end(); ++i)
+		(*i)->widget->autosize();
+
+	vector<unsigned> widths;
+	List *list = static_cast<List *>(parent);
+	for(vector<Item *>::const_iterator i=list->items.begin(); i!=list->items.end(); ++i)
+		if(*i!=this)
+			if(MultiColumnItem *mci = dynamic_cast<MultiColumnItem *>(*i))
+				mci->check_widths(widths);
+
+	vector<unsigned> self_widths(widths);
+	check_widths(self_widths);
+	bool update_all = false;
+	for(unsigned i=0; (!update_all && i<widths.size() && i<self_widths.size()); ++i)
+		update_all = self_widths[i]>widths[i];
+
+	if(update_all)
+	{
+		for(vector<Item *>::const_iterator i=list->items.begin(); i!=list->items.end(); ++i)
+			if(MultiColumnItem *mci = dynamic_cast<MultiColumnItem *>(*i))
+				mci->set_widths(self_widths);
+	}
+
+	set_widths(self_widths);
+}
+
+
+List::BasicItem::BasicItem(const string &text):
+	label(text)
 {
-	first=items.size()-n_visible-static_cast<unsigned>(value);
+	add(label);
 }
 
 
 List::Loader::Loader(List &l):
-	Widget::Loader(l)
+	DataFile::DerivedObjectLoader<List, Widget::Loader>(l)
 {
 	add("item", &Loader::item);
+	add("view_size", &List::view_rows);
 }
 
 void List::Loader::item(const string &v)
 {
-	static_cast<List &>(wdg).append(v);
+	dynamic_cast<BasicListData<string> &>(*obj.data).append(v);
 }
 
 } // namespace GLtk