[perl-win32-gui] Button "-default" option

[Max Kozlov]

Hello perl-win32-gui,

  is it works ?

$W->AddButton(
    -name => "Simple",
    -left => 5,
    -top  => 5,
        -text => "Click button",
        -default => 1
);

  when i set '-default=>1' then i get "default" shape of button, but when i press
  'Enter' i don't get any event. why ?

Best regards,
 Max                          mailto:[EMAIL PROTECTED]