Re: menu shortcuts don't work on Windows?

[bungsuputra linan]

To bind a keyboard shortcut, I usually add tab (\t) followed with a key
combination, like the code below.

EVT_MENU( $self, $file-Append( wxID_OPEN, Open\tCtrl+O), on_open);

I hope it works for you.
Regards,
bungsu


On Wed, 2008-07-16 at 11:45 +0300, Gabor Szabo wrote:
 I have code like this:
 
  my $bar  = Wx::MenuBar-new;
  my $file = Wx::Menu-new;
  EVT_MENU(  $self, $file-Append( wxID_OPEN,   Open   ), \on_open
 );
 
 On Ubuntu using Wx 0.82 it works.
 
 On Windows (Strawberry Perl) using Wx 0.83 or 0.84 the menu is there
 and it works
 but the shortcut Ctr-O does not work and I don't even have the nice icons.
 
 How can I make them work and the icons (or at least the short-cuts) to show 
 up?
 
 Gabor

Re: menu shortcuts don't work on Windows?

[Gabor Szabo]

Well, that makes the shortcut show up in the menu but it still does not work :-(

BTW my windows is running in a VMWare.
I don't think it should matter as Notepad++ works just fine but anyway.

Gabor

On Wed, Jul 16, 2008 at 12:24 PM, bungsuputra linan
[EMAIL PROTECTED] wrote:
 To bind a keyboard shortcut, I usually add tab (\t) followed with a key
 combination, like the code below.

 EVT_MENU( $self, $file-Append( wxID_OPEN, Open\tCtrl+O), on_open);

 I hope it works for you.
 Regards,
 bungsu


 On Wed, 2008-07-16 at 11:45 +0300, Gabor Szabo wrote:
 I have code like this:

  my $bar  = Wx::MenuBar-new;
  my $file = Wx::Menu-new;
  EVT_MENU(  $self, $file-Append( wxID_OPEN,   Open   ), \on_open
 );

 On Ubuntu using Wx 0.82 it works.

 On Windows (Strawberry Perl) using Wx 0.83 or 0.84 the menu is there
 and it works
 but the shortcut Ctr-O does not work and I don't even have the nice icons.

 How can I make them work and the icons (or at least the short-cuts) to show 
 up?

 Gabor





-- 
Gabor Szabo http://szabgab.com/blog.html
Perl Training in Israel http://www.pti.co.il/
Test Automation Tips http://szabgab.com/test_automation_tips.html
Phones: +972-8-975-2897 +972-54-4624648

Re: menu shortcuts don't work on Windows?

[Johan Vromans]

Gabor Szabo [EMAIL PROTECTED] writes:

 I have code like this:
 
  my $bar  = Wx::MenuBar-new;
  my $file = Wx::Menu-new;
  EVT_MENU(  $self, $file-Append( wxID_OPEN,   Open   ), \on_open
 );

You can leave out Open (make it an empty string) and Wx will choose
the right icon, text and shortcut. And translate it into the target
language as a bonus.

  EVT_MENU(  $self, $file-Append( wxID_OPEN,  ), \On_open );

BTW: Did you use wxGlade?

-- Johan