Question

我正在关注在线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();

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

Answer 1

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

Answer 2

生日 - ＆gt; SetFocus（）会正常工作....

你可以尝试

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

2 个答案: