Tkx的窗口怎么显示在屏幕最前端

睫毛上的雾

Tkx的。
Win32::API->new("user32","SetWindowPos",[qw(N N N N N N N)],'N')->Call(hex($mw->frame()),-1,0,0,0,0,3);这句要怎么改呢？

winsettop要怎么用呢
SetActiveWindow，SetForegroundWindow可不可以呢？

ymhui520

上次FORM用不了，这次又碰到你在这里问题TKX,....

zhlong8

这个要查TK的文档吧,是不是那个raise

睫毛上的雾

回复 3# zhlong8


    这个raise要怎么用呢？
$w->g_raise;吗
好像不行哦

睫毛上的雾

正确的做法是
#!/usr/bin/perl -w
use Tkx;
my $mw = Tkx::widget->new(".");
$mw-> g_wm_attributes(-topmost => 'true');
$mw->new_button(
       -text => "Hello, world",
)->g_pack;
  Tkx::MainLoop();

虽然可能API也可以。
结贴了