ギコタクの「だから逝ってないでしょ」出張所 (427ﾚｽ)
上下前次1-新
32(1): 名無しさん＠お腹いっぱい。 2001/06/18(月)00:43 ID:??? AAS
AA省
33: 名無しさん＠お腹いっぱい。 2001/06/18(月)00:46 ID:??? AAS
AA省
34(2): 名無しさん＠お腹いっぱい。 2001/06/18(月)05:52 ID:??? AAS
>>27
>ちなみに、かちゅーしゃライクなポップアップは$TextWidget->tagBind()で簡単に実装できるよ。
もっと詳しく教えて_gunzipたん
35(1): _gunzip [_crescent] 2001/06/18(月)08:42 ID:??? AAS
>>34
一例だよ。
---------------------------------------
#!/usr/bin/perl -w
use Tk;
use strict;
our $mw = MainWindow->new();
our $text = $mw->Scrolled('Text', -scrollbars => 'e')->pack(-expand => 'yes', -fill => 'both');
our $pop_message = $text->Message(
-background => 'white',
省16
36: _gunzip [_crescent] 2001/06/18(月)08:44 ID:??? AAS
AA省
37: 名無しさん＠お腹いっぱい。 [ ] 2001/06/18(月)10:28 ID:??? AAS
AA省
38(1): 顔も名前も出さずに毎月１００万円 2001/06/18(月)11:24 ID:fkO4aTN2(1) AAS
今度新しく5,000サイトとの共有を目指す
宣伝掲示板、その名もおりーぶおじさんの
超共有宣伝掲示板を設置しました。是非み
なさん、共有してください。先着50名様だ
けバナーリンクします。26番目の掲示板と
して設置してますので、そこをクリックして
参加の方法を見て早くご参加くださいませ。
おりーぶおじさんのホームページ
外部ﾘﾝｸ:home9.highway.ne.jp
39: 名無しさん＠お腹いっぱい。 2001/06/18(月)11:34 ID:??? AAS
AA省
40: 34 [0] 2001/06/18(月)16:53 ID:??? AAS
>>35
なるほどーサンクスｖ
Perl/Tkって面白いな♪
41: 名無しさん＠お腹いっぱい。 2001/06/20(水)05:24 ID:/WkSGKxo(1) AAS
AA省
42(1): 16 2001/06/21(木)03:41 ID:??? AAS
AA省
43(1): 名無しさん＠お腹いっぱい。 [ ] 2001/06/21(木)17:10 ID:??? AAS
AA省
44: 16 2001/06/21(木)22:51 ID:??? AAS
AA省
45(1): 18 [0] 2001/06/24(日)19:29 ID:??? AAS
わー本当に作ってくれたんですか！ありがとうですです。
とりあえず使ってみた感想…
を書こうとしたら031の方はメニューは大丈夫なんだけど下の部分が文字化け。（うちの設定が悪いんかな？）
033の方はなんかWidget.pmとAfter.pmがbad anchor positionだと怒られる…
んー厨房ですまんです。。
46: age [age] 2001/06/24(日)23:56 ID:??? AAS
age
47(1): 16 2001/06/25(月)00:21 ID:Kol/mXZI(1/2) AAS
なんでだろう？
うちだと動いてるけど。
Tkが4.x系統だったりしないよねぇ？
っつーか誰も反応ないから破棄しようかと思ってたんだが（ｗ
これからLinuxにもTk入れてみるか・・・・
48(1): 名無しさん＠お腹いっぱい。 2001/06/25(月)00:48 ID:42iy55BY(1) AAS
AA省
49: 16 2001/06/25(月)01:50 ID:Kol/mXZI(2/2) AAS
あーなんかMakeにやたら時間かかった。さすがPentium133だけのことはあるな。
そりゃともかく、うちでは31も33もちゃんと動いたぞ。
Linuxだとすごい勢いで文字化けしてた風だけど、半角カナのせいみたい。
どうしたらいいんだろ・・・・
文字がずれるのはモナーフォントとか入れてもらうとして。
>>45
とりあえず $textfont = ... と $menufont = をいじってみてー。
>>48
そんなにリンク地味だった？（ｗ
50(1): 名無しさん＠お腹いっぱい。 [ ] 2001/06/25(月)11:38 ID:??? AAS
AA省
51: 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)10:49 ID:??? AAS
AA省
52: 名無しさん＠お腹いっぱい。 2001/06/26(火)11:29 ID:yYk1Uw7I(1) AAS
外部ﾘﾝｸ:aspn.activestate.com
ここでActivePerl 5.6.1.626を落としてインストール。
その後、コマンドラインで
C>ppm[Enter]
ppm> search Tk[Enter]
ppm> install Tk[Enter]
でOK。
53: 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)13:03 ID:??? AAS
AA省
54: 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)13:15 ID:??? AAS
AA省
55: 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)13:25 ID:??? AAS
AA省
56(1): 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)14:43 ID:??? AAS
AA省
57: 電動ナナシ [0] 2001/06/26(火)17:52 ID:??? AAS
AA省
58: rubbish_lister 2001/06/26(火)18:00 ID:??? AAS
AA省
59: 名無しさん＠お腹いっぱい。 [ ] 2001/06/26(火)18:39 ID:??? AAS
AA省
60: ひろゆき＠管直人 2001/06/26(火)18:45 ID:??? AAS
AA省
61: 18 [0] 2001/06/26(火)20:21 ID:??? AAS
AA省
62(1): 梨 2001/06/26(火)21:19 ID:6WVCIie2(1) AAS
AA省
63: 16 2001/06/27(水)00:17 ID:NfbVrjcI(1/3) AAS
AA省
64: なごやん [ ] 2001/06/27(水)11:08 ID:??? AAS
AA省
65: 梨 2001/06/27(水)15:23 ID:keWx3MwY(1) AAS
AA省
66(2): 名無しさん＠お腹いっぱい。 2001/06/27(水)16:36 ID:??? AAS
AA省
67(1): 名無しさん＠お腹いっぱい。 2001/06/27(水)17:31 ID:??? AAS
AA省
68: 67 2001/06/27(水)18:04 ID:??? AAS
あ、違うか。よく読んでなかった。ｽﾏｿ
69(1): 名無しさん＠お腹いっぱい。 [0] 2001/06/27(水)18:07 ID:??? AAS
AA省
70: 16 2001/06/27(水)18:32 ID:NfbVrjcI(2/3) AAS
AA省
71: 名梨さん＠お腹いっぱい。 2001/06/27(水)19:24 ID:??? AAS
AA省
72: 名無しさん＠お腹いっぱい。 [ ] 2001/06/28(木)12:11 ID:??? AAS
AA省
73: _gunzip [_crescent] 2001/06/28(木)16:40 ID:??? AAS
AA省
74: _gunzip [_crescent] 2001/06/28(木)16:40 ID:??? AAS
AA省
75: 16 2001/06/29(金)05:35 ID:??? AAS
AA省
76: 16 2001/06/29(金)12:48 ID:??? AAS
AA省
77: 名無しさん＠お腹いっぱい。 [ ] 2001/06/30(土)17:21 ID:??? AAS
AA省
78: 名無しさん＠お腹いっぱい。 2001/07/02(月)00:41 ID:??? AAS
<INPUT TYPE=submit VALUE="かきこむ" name="submit">
79(1): 16 2001/07/02(月)01:52 ID:jXUn5Xms(1/5) AAS
AA省
80: 名無しさん＠お腹いっぱい。 [0] 2001/07/02(月)02:45 ID:??? AAS
AA省
81: rubbish_lister 2001/07/02(月)03:43 ID:??? AAS
AA省
82: 名無しさん＠お腹いっぱい。 2001/07/02(月)06:27 ID:??? AAS
Cookie => 'NAME; MAIL'
83: 16 2001/07/02(月)11:35 ID:jXUn5Xms(2/5) AAS
AA省
84: 16 2001/07/02(月)12:16 ID:jXUn5Xms(3/5) AAS
AA省
85(1): 16 2001/07/02(月)12:37 ID:jXUn5Xms(4/5) AAS
AA省
86: 名無しさん＠お腹いっぱい。 2001/07/02(月)12:42 ID:??? AAS
AA省
87: rubbish_lister 2001/07/02(月)15:14 ID:??? AAS
AA省
88: 名無しさん＠お腹いっぱい。 [ ] 2001/07/02(月)15:14 ID:??? AAS
AA省
89: 名無しさん＠お腹いっぱい。 [ ] 2001/07/02(月)16:10 ID:??? AAS
すげーーー
ＡＡ書き忘れるくらいすげーーーー
Ｃやろうと思ってたけどこりゃＰｅｒｌ／Ｔｋの方が面白そうだ（わら
90: _gunzip@テスト [_crescent] 2001/07/02(月)17:22 ID:??? AAS
∧ ∧ ♪
(,,・∀・)
〜（＿__ﾉ
91: _gunzip [_crescent] 2001/07/02(月)17:42 ID:??? AAS
AA省
92: なごやん [ ] 2001/07/02(月)18:31 ID:??? AAS
AA省
93: _gunzip [_crescent] 2001/07/02(月)23:24 ID:??? AAS
AA省
94: _gunzip 2001/07/02(月)23:38 ID:??? AAS
#当然ながら、これは16さんので書きこんでいます。
sub writeres{
my $wf = $mw->Toplevel;
my $now = $f->{nowtab};
$wf->title($now->{name} .jcode("にレス")->sjis);
#----------------------------#
$wf->Label( -text => "Subject: ")
->form( -top => '%3', -left => '%3', -right => '%15');
$wf->Entry( -font => $textfont , )
省29
95: _gunzip 2001/07/02(月)23:40 ID:??? AAS
#----------------------------#
my $tab = 'EXTRACT';
$wf->Checkbutton(
-text => 'convert tabs', -variable => \$tab,
-onvalue => 'EXTRACT', -offvalue => 'IGNORE',
)->form( -top => '%10', -left => '%80', -right => '%95' );
#----------------------------#
my $txt = $wf->Scrolled( 'Text',
-scrollbars => 'e', -width=>50 -height => 15,, -font => $textfont
省23
96: _gunzip [_crescent] 2001/07/02(月)23:43 ID:??? AAS
それと、-w オプションを付けて起動した場合、
レスを取得するたびに238行目でUse of unintialized 〜警告が出ます。
（原因はまだ調べていません........）
97: 16 2001/07/03(火)00:07 ID:ipaH5kuY(1) AAS
AA省
98: なごやん [ ] 2001/07/03(火)18:45 ID:??? AAS
AA省
99(3): 名無しさん＠お腹いっぱい。 2001/07/03(火)21:55 ID:??? AAS
66氏とは別人ですが。
実行しようとすると。
Can't locate Jcode.pm in @INC (@INC contains: C:/perl/lib C:/perl/site/lib .) at
ThTab.pm line 2.
BEGIN failed--compilation aborted at ThTab.pm line 2.
Compilation failed in require at tkz4.pl line 53.
BEGIN failed--compilation aborted at tkz4.pl line 53.
と出てきます。
今回実行しようとした物は16氏の>>85です。
perl -MTk -e "print $Tk::VERSION"
省7
100(1): rubbish_lister 2001/07/03(火)23:09 ID:??? AAS
AA省
101(2): 見習い君 2001/07/04(水)00:31 ID:??? AAS
うんにゃ。出来なかった気がする。
C:\PERL> ppm install --location=外部ﾘﾝｸ[6]:www.shonanblue.ne.jp Jcode
↑こうなら出来るみたい。
参考：外部ﾘﾝｸ[html]:www.att.or.jp
102: 99 2001/07/04(水)01:27 ID:??? AAS
>>100-101
教えて君全開でした。
大変申し訳ありません。
ついついエラーメッセージをじっくり読むと言うことを怠ってしまったようです。
まだ試してはおりませんが、レスありがとうございました。
もしまた動かない場合は何とか努力致します。
本当にありがとうございました。
いつか皆さんと一緒に色々と作ったり、考えたりできるようがんばります。
103: 99 2001/07/04(水)01:46 ID:??? AAS
AA省
104: rubbish_lister 2001/07/04(水)16:44 ID:??? AAS
AA省
105: 16 2001/07/05(木)00:44 ID:A8Q42XTQ(1) AAS
AA省
106(1): _gunzip [_crescent] 2001/07/05(木)15:27 ID:??? AAS
AA省
107: rubbish_lister 2001/07/05(木)15:51 ID:??? AAS
AA省
108: _gunzip [_crescent] 2001/07/05(木)16:05 ID:??? AAS
AA省
109: _gunzip [_crescent] 2001/07/05(木)16:11 ID:??? AAS
AA省
110: _gunzip@何回も済みません [_crescent] 2001/07/05(木)16:49 ID:??? AAS
?∧ ∧ ／￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
ﾐ；・∀・ﾐ ＜ Tableウィジェット忘れてた。
＼ﾐ＿__ﾐ ＼＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
>>16氏
>スレッド一覧Widget
出来れば、どのようなメソッドを実装するべきか、
書いて頂けると有り難いです。（あと「〜が出来て欲しい」とかの要望も）
111: 16 2001/07/06(金)03:02 ID:gLmCrluw(1/2) AAS
AA省
112: 16 2001/07/06(金)03:23 ID:gLmCrluw(2/2) AAS
AA省
113: _gunzip [_crescent] 2001/07/06(金)23:22 ID:??? AAS
AA省
114: 16 2001/07/07(土)12:55 ID:XmkeoP0E(1) AAS
AA省
115: 名無しさん＠お腹いっぱい。 [あげ] 2001/07/09(月)23:03 ID:??? AAS
AA省
116: _gunzip [_crescent] 2001/07/10(火)17:31 ID:??? AAS
AA省
117: _gunzip [_crescent] 2001/07/11(水)06:21 ID:??? AAS
AA省
118: 16 2001/07/11(水)12:11 ID:OQ6S3gKE(1/2) AAS
AA省
119: _gunzip [_crescent] 2001/07/11(水)17:02 ID:??? AAS
AA省
120: 16 2001/07/11(水)17:27 ID:OQ6S3gKE(2/2) AAS
AA省
121: 名無しさん＠お腹いっぱい。 [age] 2001/07/11(水)19:59 ID:??? AAS
凄い…。ここまでできるのか…。(･∀･)ｲｲ!!
122: 名無しさん＠お腹いっぱい。 2001/07/12(木)11:13 ID:Ah5wBUQA(1) AAS
AA省
123: 名無しさん＠お腹いっぱい。 [ ] 2001/07/12(木)18:16 ID:??? AAS
AA省
124(1): 名無しさん＠お腹いっぱい。 [ ] 2001/07/12(木)18:45 ID:??? AAS
AA省
125: 名無しさん＠お腹いっぱい。 2001/07/12(木)19:58 ID:??? AAS
AA省
126: 名無しさん＠お腹いっぱい。 2001/07/13(金)00:05 ID:??? AAS
Perl/Tkすごいですね！
今までのperlのイメージがかわりました。こんなこともできるんだぁとおもいました。
ｽﾚを見よう見真似でTkと、Jcodeインストールして１６さんの作ったTｋ2chブラウザ
いじってます。
Cygwinって、DosのCommand.comのようなものですか？
127(1): 名無しさん＠お腹いっぱい。 2001/07/13(金)03:38 ID:??? AAS
AA省
128(1): 名無しさん＠お腹いっぱい。 2001/07/13(金)06:11 ID:??? AAS
>>127
Cygwinって、一言で言うとどういうものなんでしょうか。
GNUツールというと、Linux、Unixのなにかぐらいしか思い浮かばないんですが、
Linuxはうごいてるのを触ったぐらいしかないのでサパーリです。ｽﾝﾏｿ
129: 名無しさん＠お腹いっぱい。 [ ] 2001/07/13(金)10:25 ID:??? AAS
AA省
130: 128 2001/07/13(金)19:53 ID:??? AAS
AA省
131: 名無しさん＠お腹いっぱい。 2001/07/13(金)22:31 ID:??? AAS
に、日本語が使えん…＜Cygwin
上下前次1-新書関写板覧索設栞歴
あと 296 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.030s