For what it's worth, I have always been unclear on what the Win32::GUI
doco means by "the event is not passed to the default event processor".
Any clarification, anywhere, would be useful. 


Eric

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Glenn W Munroe
Sent: Tuesday, April 24, 2007 2:27 PM
To: 'Glenn Linderman'; 'GUI'
Subject: Re: [perl-win32-gui-users] disabling the check on a checkbox???

Glenn,

I wouldn't expect it to prevent it from being checked. Do you expect
this behaviour from the Windows control itself or from Win32::GUI?
Certain actions for some controls have a "pre-change" notification (e.g.
the TCN_SELCHANGING notification sent when a tab is *about* to change),
which can be used to prevent the change, but I don't see anything like
that on MSDN for a checkbox.

Or do you expect this from Win32::GUI? I know a return value of 0
prevents the "default action" from taking place, but I see that as a
"post-change"
action, if that makes sense. (I'm not sure where that action is
defined). 

Or am I missing your point entirely?

Glenn2

> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:perl-

> [EMAIL PROTECTED] On Behalf Of Glenn 
> Linderman
> Sent: 24 April 2007 13:39
> To: GUI
> Subject: [perl-win32-gui-users] disabling the check on a checkbox???
> 
> use strict;
> use warnings;
> 
> use Win32::GUI();
> 
> my $mw;
> 
> $mw = new Win32::GUI::Window(
>     -name         => "mw",
>     -title        => "Checkbox default action",
>     -pos          => [100, 100],
>     -size         => [200, 200],
>     -dialogui     => 1,
> );
> 
> $mw->AddCheckbox(
>       -name   => "cb",
>       -text   => 'click me',
>       -pos    => [10, 20],
>       -tabstop  => 1,
>       -onClick => sub { return 0; },
> );
> 
> 
> $mw->Show();
> Win32::GUI::Dialog();
> 
> 
> Why does the above program allow the checkbox to be checked and 
> unchecked?  Why doesn't the -onClick handler, which returns 0, prevent

> the box from being checked?
> 
> --
> Glenn -- http://nevcal.com/
> ===========================
> A protocol is complete when there is nothing left to remove.
> -- Stuart Cheshire, Apple Computer, regarding Zero Configuration 
> Networking
> 
> 
> ----------------------------------------------------------------------
> --- This SF.net email is sponsored by DB2 Express Download DB2 Express

> C - the FREE version of DB2 express and take control of your XML. No 
> limits. Just data. Click to get it now.
> http://sourceforge.net/powerbar/db2/
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Perl-Win32-GUI-Users@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> http://perl-win32-gui.sourceforge.net/


------------------------------------------------------------------------
-
This SF.net email is sponsored by DB2 Express Download DB2 Express C -
the FREE version of DB2 express and take control of your XML. No limits.
Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
http://perl-win32-gui.sourceforge.net/

Reply via email to