RE: [perl-win32-gui-users] Win32::DialogBox - LostFocus() Event in Button and RadioButton Objects doesn't seem to work for me

[Frazier, J. J. <Joe...@Pe...>]

Thanks Harald.  I did some playing and found:

Combobox:

7 =3D Open Dropdownlist
8 =3D Close Dropdownlist
9 =3D Change
10 =3D Lost Focus( got focus does not seem to give a value)

My call to reset did not seem to throw an event( no change event, nor
did additem).  I can assume that this means the events are only fired if
done by user interaction and not via script.

I have not had time to test button or other stuff yet, but hope this
helps someone.

Joe Frazier, Jr.
Technical Support Engineer
Peopleclick Service Support

Tel:  +1-800-841-2365
E-Mail: mailto:su...@pe...


> -----Original Message-----
> From: Piske, Harald [mailto:Har...@bo...]
> Sent: Friday, November 16, 2001 5:43 AM
> To: 'bt...@us...'; Win32-GUI-Mailing List (E-mail)
> Subject: RE: [perl-win32-gui-users] Win32::DialogBox -=20
> LostFocus() Event
> in Button and RadioButton Objects doesn't seem to work for me
>=20
>=20
> > The LostFocus() event doesn't respond at all when a mouse click=20
> > happens on another object (button, textfield, etc.)
>=20
> From what I can see in the xs code, the button class is treated in a
> different manner. You might want to try
>=20
> Button_Anonymous {print join (', ', @_), '\n';}
>=20
> This is an event handler that gets called for a lot of the otherwise
> unhandled cases. If you're lucky, _LostFocus is one of them.=20
> The actual
> message number is passed as the first parameter. I don't=20
> exactely remember
> if _Anonymous gets fired for each unhandled message or just unhandled
> notification messages.
>=20
> If that does not help, you could subclass all your controls to receive
> _MouseMove events and call your _LostFocus sub when another=20
> control or the
> window sees mouse moves ... very easy in theory, just=20
> terribly annoying to
> actually implement :-/
>=20
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> Per...@li...
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
>=20