作者: Keiichi Takahashi
日時: 2002/10/16(16:48)
ビットウォークの高橋です。自己フォローをします。

> ところで、以前、廣島さんのメールで次のように日本語フォントの表示に関する
> コメントがありましたが、このパッケージでは日本語フォントを表示できませ
> ん。特別なフォントが必要なんでしょうか。

Tk804.0_24の日本語フォント表示の件について、comp.lang.perl.tkで尋ねてみ
たら、encodingを使えばよいと教えてもらったので、一応報告しておきます(こ
ういうことに気が付かないのは自分だけかもしれず恥ずかしいのですが…。)

次のようなサンプルで無事日本語表示ができました。

#!/usr/bin/perl -w
use encoding "euc-jp";
use Tk;
$mw = MainWindow->new();
$mw->title("button");
$mw->Button(-text    => "押して♪",
	    -command => sub {$mw->bell;})
    ->pack();
MainLoop;


-- 
Keiichi Takahashi, bitWalk Co.,Ltd.
mailto:bitwalk@...
http://members10.tsukaeru.net/bitwalk/