GtkCListModelSection: User Contributed Perl Documentation (3)Updated: 2001-06-26 |
GtkCListModelSection: User Contributed Perl Documentation (3)Updated: 2001-06-26 |
my $model = tie @data, 'Gtk::CListModel',
titles => ["Fruit", "Price", "Quantity"];
# all data manipulation is done on @data now
push @data, ["Oranges", 5, 16];
# Create a view (a Gtk::Clist widget) to represent the data
# Include only some of the data in the view (fruit type and price)
# Also, do not include fruits that cost more than 6 price units.
my $clist = $model->create_view('main',
titles => ['Fruit', 'Price'],
filter => sub {$_[1] > 6? () : @_});
All the data manipulations will be performed on a tied array and the changes will be propagated to the views created for that data.
To create the model use "tie":
my $model = tie @data, 'Gtk::CListModel',
titles => ["head1", "head2",...];
The "titles" attribute should be an array reference with the titles of the columns of data. They will be used also for the default titles in the views.
You can also provide the initial data using the "data" attribute. Remember that the data elements you insert and retreive from the @data array are array references with as many items as the columns in the model. The order is the one defined by the "titles" attribute.
Later you can manipulate the @data array with the usual perl array operators, push, splice and so on.
Options can be one of the following: