[perl-win32-gui-users] set button as default

[NAHUM Marc]

how set a button as delault ?

when I put somthing like this :

$Win_info_srv->AddButton(
       -text    => "OK",
       -name    => "Button_ok_srv",
       -left    => 190,
       -top     => 185,
       -width   => 50,
       -height  => 21,
       -foreground => 0,
       -tabstop => 1,
       -default => 1,
      );

the button is like default but I can't push "enter" to validate ....

thanks for help ...