Nathan,

I've never tried to use the accelerator key but Aldo's
Pride script does use Ctrl-G from within the RichEdit
field to bring up a dialog box to goto a particular line

I added a few things to this and the code looks like this

     sub Editor_KeyPress {
        my($key) = @_;
        if ($key == 6 ){          # Ctrl-F
           Find_Click();
        } elsif ($key == 7)  {    # Ctrl-G
           return 0;
        } elsif ($key == 14) {    # Ctrl-N
           FindNext_Click();
        } elsif ($key == 9)  {    # Tab
           return 0;
        } elsif ($key == 13) {    # Enter

          etc

where the RichEdit field is called Editor.  Something like that might do
what you want,
although the keys only work when the Editor field has focus.

Cheers,

Kev.

----------------------------------------------------------------------------------------------------------------------------
Hello,

I'm new to Win32::GUI and trying to solve a problem; I can't find a
thing about it in the mail archives.

Is it possible to define keyboard accelerators for menu items - not the
mnemonics used in conjunction with the Alt key, but the Ctrl characters
that dispatch to menu callbacks (commonly done in GUI applications)?

Nathan Meyers
[EMAIL PROTECTED]

_______________________________________________
Perl-Win32-GUI-Users mailing list
Perl-Win32-GUI-Users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users


Reply via email to