ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

ギコタクの「だから逝ってないでしょ」出張所

PC,ｽﾏﾎ,PHSは 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>35 > >>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', >     -relief => 'raised', >     -foreground => 'blue', >     -text => "the straight-line distance as the crow flies.\n(Euclid: fl 370 B.CE)" > ); > > #make 'desc' tag > $text->tagConfigure('desc', -foreground => 'blue'); > $text->tagBind('desc', '<Enter>', [\&popup, Ev('x'), Ev('y')]); > $text->tagBind('desc', '<Leave>', sub { $pop_message->placeForget() } ); > > $text->insert('end',"There are many ways to define the distance between two points. the most intuitive and common definition is "); > $text->insert('end', "Eucidean distance", 'desc'); > > MainLoop; > > sub popup{ > my($x, $y) = @_[1,2]; > $pop_message->place(-x => $x, -y => $y); > } > ---------------------------------------
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

ﾒﾓ帳

(0/65535文字)

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.015s