Re^4: Bitmap for beginners (Perl Tk)

Replies are listed 'Best First'.
Re^5: Bitmap for beginners (Perl Tk) by mawe (Hermit) on Feb 16, 2005 at 10:21 UTC
Hi! The data you receive from encode_photo_data() is not a file, so you have to use Photo(-data=>...): `$encoded_pic = encode_photo_data("up.bmp"); my $pic = $top->Photo(-data=>$encoded_pic);` [download] or in one line: `my $pic = $top->Photo(-data=>encode_photo_data("up.bmp"));` [download] Regards, mawe	[reply] [d/l] [select]
Re^6: Bitmap for beginners (Perl Tk) by TonyDonker (Novice) on Feb 16, 2005 at 10:46 UTC
This works also fine: `use Tk;<br/> my $top = new MainWindow;<br/> my $pic = $top->Photo(-file=>"img/hals.gif");<br/> $top->Button(-image=>$pic)->pack();<br/> MainLoop();<br/><br/>` [download] a .GIF instead of a .BMP	[reply] [d/l]