我正在关注在线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();
但它不起作用。有人可以帮忙吗?提前谢谢。
答案 0 :(得分:2)
$Object->Birthday->
SetFocus()
怎么样?
答案 1 :(得分:-1)
生日 - > SetFocus()会正常工作....
你可以尝试