27 Oct 2012 00:35:57 UTC
- Distribution: Gtk2-Ex-WidgetBits
- Module version: 48
- Source (raw)
- Browse (raw)
- How to Contribute
- Issues (0)
- Testers (2348 / 50 / 0)
- KwaliteeBus factor: 1
- 42.85% Coverage
- License: open_source
- Perl: v5.8.0
- Activity24 month
- Download (136.17KB)
- MetaCPAN Explorer
- Subscribe to distribution
- This version
- Latest versionKRYDE Kevin Rydeand 1 contributors
- Kevin Ryde
Gtk2::Ex::WidgetEvents -- event mask merging for widgets
use Gtk2::Ex::WidgetEvents; my $wm = Gtk2::Ex::WidgetEvents->new ($widget, ['motion-notify-mask']); my $we = Gtk2::Ex::WidgetEvents->new ($widget); $we->add (['motion-notify-mask','exposure-mask']); $we->remove ('exposure-mask');
WidgetEvents represents an event mask wanted on a particular widget for an add-on feature or semi-independent widget component. The event mask on the widget's window is the union of WidgetEvents masks and the widget's base mask.
The plain GtkWidget
add_eventsis geared towards permanent additions to the event mask. Often this is enough. But for removing mask bits to clean up after a widget add-on it's important to check whether anyone else is still interested in those events. WidgetEvents keeps track of that.
Turning event mask bits on and off is mostly a matter of optimization. For example it does no great harm to have mouse motion events left on, but it's wasteful. Sometimes it's important for event propagation rules to have an event turned off when unwanted, so for example a button press can go up to a parent window instead.
In the following functions
$maskcan be any of the usual Glib flags forms, meaning an actual
Gtk2::Gdk::EventMaskobject, an arrayref of flag name strings, or a single flag name string (see "This Is Now That" in Glib).
$wevents = Gtk2::Ex::WidgetEvents->new ($widget)
$wevents = Gtk2::Ex::WidgetEvents->new ($widget, $mask)
Create a new
WidgetEventsobject which adds
$maskcan be omitted to start a WidgetEvents with no mask bits.
$wevents = Gtk2::Ex::WidgetEvents->new ($widget, ['button-press-mask']);
$weventsobject only keeps a weak reference to the given
$widget, which means it's safe to keep it in the widget's instance data without creating a circular reference.
$maskevents to those already selected by
$wevents. The target widget's window is updated immediately if it's realized.
$wevents->add (['enter-notify-mask', 'leave-notify-mask']);
$maskevents from those selected by
$wevents. The target widget's window is updated immediately if it's realized and if nobody else is interested in each
$wevents->remove (['enter-notify-mask', 'leave-notify-mask']);
The event mask for a widget window comes from flags coded into the widget implementation plus those in the widget
eventsproperty. The hard coded flags are normally for a widget's builtin features, and the
eventsproperty is extras wanted by external code. The
$widget->add_eventsmethod extends the
WidgetEvents notices both of these on a window and takes them as a base set of event mask bits. The base flags are always left installed. Additional bits wanted or not by WidgetEvents objects are then set or cleared.
Copyright 2008, 2009, 2010, 2011, 2012 Kevin Ryde
Gtk2-Ex-WidgetBits is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version.
Gtk2-Ex-WidgetBits is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with Gtk2-Ex-WidgetBits. If not, see http://www.gnu.org/licenses/.
Module Install Instructions
To install Gtk2::Ex::WidgetBits, copy and paste the appropriate command in to your terminal.
perl -MCPAN -e shell install Gtk2::Ex::WidgetBits
For more information on module installation, please visit the detailed CPAN module installation guide.