> -------Original Message-------
> From: Geoff Horsnell <ge...@horsnell.freeserve.co.uk>
> Subject: Perl Tk system button
> Sent: Sep 11 '09 17:02
>
> Is it possible to change the image in the system menu button (The red Tk
> button in the top left hand corner of all GUI windows)? I would like to add
> my own icon in place of this symbol.
>
>
#!perl -w
use strict;
use Tk;
use Tk::Photo;
my $mw = tkinit;
my $ico = $mw->Photo(-file=>"c:/myapp/icon.bmp");
$mw->iconimage($ico);
MainLoop;
HTH - Lynn.
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs