in reply to Using pp with Tk garbles my lable fonts...
my $font = $mw->fontCreate('normal', -family => "helvetica", -size => 24, -weight => "bold"); my $bigfont = $mw->fontCreate('big', -family=>'courier', -weight=>'bold', -size=>int(-18*18/14)); my $info_frm = $mw->Frame( -relief => 'groove', -borderwidth => 2, -label => "This application is to install Libs", -labelFont=> 'bigfont') ->pack;
|
|---|