RE: [perl-win32-gui-users] AcceleratorTable

[Peter Eisengrein]

I've never been able to get the -accel's to work either. Good luck, I am
looking forward to seeing the resolution on this.

-----Original Message-----
From: Erick J. Bourgeois [mailto:[EMAIL PROTECTED]
Sent: Saturday, February 03, 2001 10:00 AM
To: perl-win32-gui-users@lists.sourceforge.net
Subject: Re: [perl-win32-gui-users] AcceleratorTable


The subs that you supplied do not respond to the keys either. Any more
ideas?
 
erick
never stop questioning
www.jeb.ca <http://www.jeb.ca> 

----- Original Message ----- 
From: Peter Eisengrein <mailto:[EMAIL PROTECTED]>  

I may be wrong, but I've found that you cannot call a _Click() directly (you
actually have to Click on something). I'd try this with your subs:
 

sub Open_Click {
    Open();
}
 
sub Open {
    my $file=GUI::GetOpenFileName(-title=>"File To Open",
-filter=>["*.*"],);
}
sub OpenHK_Click {
    Open;
}