|
● Apr 18, 2002 (Thu) 11:41 - Win32::GUI http://www.jeb.ca/howto/The_Win32-GUI_HOWTO.html いいかも，これ．．． 日本語がちゃんと扱えるし． でもリサイズとか追従してくれない‥‥‥． そのあたりの良い解説どっかにないかなぅ．．． #!perl use Win32::GUI; use strict; my $window = new Win32::GUI::Window( -width => 300, -height => 300, -name => 'mainwindow', -text => 'てすとてすと', ); my $text = $window->AddTextfield( -name => "Multitext", -multiline => 1, -autohscroll => 0, -autovscroll => 1, -vscroll => 1, -hscroll => 0, -pos => [ 2, 2 ], -size => [ 287, 240 ], ); $text->Text('日本語てすとー'); $window->Show(); Win32::GUI::Dialog(); sub mainwindow_Terminate { return -1; } |
|