Perl FileSelect：设置窗口位置

Question

我正在使用Tk :: FileSelect模块中的Perl FileSelect。默认情况下，FileSelect主窗口显示在屏幕中间。

但是，对于我的双监视器设置，主窗口的一半显示在左侧监视器上，一半显示在右侧监视器上。我猜它正在尝试在组合双监视器桌面的中间显示主窗口。但是，我不喜欢这样。我只想在左侧监视器上显示FileSelect主窗口。我尝试了各种-geometry =>“ + 0 + 0”选项，但是无法正常工作。有人知道吗？

这里是代码段：

use Tk;
use Tk::FileSelect;
$a = MainWindow->new;
$b = $a->FileSelect();
$b->Show;

Answer 1

实际上，我只是想通了。在FileSelect.pm文件（用户不应编辑该文件）中，我创建了一个名为Popup（）的子例程。该子例程在Tk框架中具有特殊含义。我不知道这是什么意思，因此以下内容可能会引起争议。但这似乎可行：

sub Popup {
    my ($w) = @_;
    $w->geometry("+0+0");
    $w->deiconify();
    $w->raise;
}