Re: perltray/tk intercept windows minimize function

As for maximize -- why not use Thundergnats solution? It seems to work 
perfectly well for me. Below is the updated code...

use Tk;
use Win32::GUI;

my $mw = MainWindow->new;

my $winH = hex($mw->frame);
my $style = Win32::GUI::GetWindowLong($winH, -16);
$style &= ~(WS_MINIMIZEBOX | WS_MAXIMIZEBOX);
Win32::GUI::SetWindowLong($winH, -16, $style);
Win32::GUI::DrawMenuBar($winH);
Win32::GUI::Maximize($winH);

MainLoop;




-++**==--++**==--++**==--++**==--++**==--++**==--++**==
This message was posted through the Stanford campus mailing list
server.  If you wish to unsubscribe from this mailing list, send the
message body of "unsubscribe ptk" to [email protected]