Hi,
I tryed this example from Tk FAQ to display en image.
use strict;
use Tk;
my $main = new MainWindow;
my $canvar = $main ->Canvas;
$canvar->pack;
my $file = 'demos/images/earth.gif';
my $img =
$canvar->Photo( 'IMG',
-file => Tk->findINC($file) );
$canvar->create( 'image',0,0,
'-anchor' => 'nw',
'-image' => $img );
MainLoop;
It worked fine but can only get image from Tk directory.
It possible get en image and display from anywhere on my PC?
Thanks a lot!
I tryed this example from Tk FAQ to display en image.
use strict;
use Tk;
my $main = new MainWindow;
my $canvar = $main ->Canvas;
$canvar->pack;
my $file = 'demos/images/earth.gif';
my $img =
$canvar->Photo( 'IMG',
-file => Tk->findINC($file) );
$canvar->create( 'image',0,0,
'-anchor' => 'nw',
'-image' => $img );
MainLoop;
It worked fine but can only get image from Tk directory.
It possible get en image and display from anywhere on my PC?
Thanks a lot!