如何在Perl中使用Win32 GUI自动关注文本字段?

时间:2009-12-26 06:18:18

标签: perl user-interface textfield autofocus

我正在关注在线Win32::Gui tutorial,以了解如何向我的Perl应用程序添加GUI。到目前为止一切都很好。但我有一些讨厌的小问题。所以我再次在这里寻求帮助。

一个问题是,我必须在文本字段中单击鼠标才能输入。我尝试了一些谎言:

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

    );


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

但它不起作用。有人可以帮忙吗?提前谢谢。

2 个答案:

答案 0 :(得分:2)

$Object->Birthday-> SetFocus()怎么样?

答案 1 :(得分:-1)

生日 - > SetFocus()会正常工作....

你可以尝试