我怎么能自动对焦的Perl中使用Win32 GUI一个文本框？

Question

我下面的在线的Win32 ::桂教程了解如何添加一个GUI到我的Perl应用程序。到目前为止，一切都一直很好。但我有一些烦人的小问题。所以我要求帮助这里一次。

一个问题是，我必须点击我的鼠标在文本框之前，我可以打字。我试图东西谎言这样：

$Object->AddTextfield(
        -name   => "Birthday",
        -left   => 75,
        -top    => 50,
        -width  => 180,
        -height => 20,
        -number => 1,
        -prompt => "Input birthday:",       

    );


$Object->Birthday->GetFocus();
$Object->Birthday->Activate();

但是，这是行不通的。谁能好心帮？由于事先。

Answer 1

如何约$Object->Birthday-> SetFocus()

Answer 2

Birthday-> SetFocus的（）将细工作....

您可以尝试