我正在关注在线Win32::Gui 教程来学习如何将 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();
但它不起作用。任何人都可以帮忙吗?提前致谢。