[ruby-list:25588] Re: Ruby/GTK の FileSelection が Win95 でうまく動きません

いとうです。
yashiさん ありがとうございます。

At Mon, 23 Oct 2000 20:50:00 +0900,
Yasushi Shoji wrote:
> うちだと、
> 
> $ ruby -v -r gtk -e "Gtk::VBox.new.signal_connect('clicked'){}"
> ruby 1.6.2 (2000-10-18) [i686-linux]
> 
> Gtk-WARNING **: gtk_signal_connect_full(): could not find signal
> "clicked" in the `GtkVBox' class ancestry
 
確かに私のところでも、Linux上では

$ ruby -v -r gtk -e "Gtk::VBox.new.signal_connect('clicked'){}"
ruby 1.4.5 (2000-06-26) [i586-linux]

Gtk-WARNING **: gtk_signal_connect_full(): could not find signal
 "clicked" in the `GtkVBox' class ancestry

となりました。
ただ、先ほど確認してみたのですが、実際のスクリプトをWindows上の
DOSプロンプトで実行したときにエラーが出るのは、Gtk::VBox.newの
ところではなく、以下のタイミングで起こりました。

irb(main):039:0> fs = Gtk::FileSelection.new('')
#<Gtk::FileSelection: id=0xe9b9890>
irb(main):040:0> fs.ok_button.signal_connect('clicked') {
irb(main):041:1* fs.hide
irb(main):042:1> $callback.call fs.get_filename
irb(main):043:1> }

Gtk-WARNING **: gtk_signal_connect_full(): could not find signal
 "clicked" in the `GtkVBox' class ancestry
0
irb(main):044:0> fs.cancel_button.signal_connect('clicked') {
irb(main):045:1* fs.hide
irb(main):046:1> }
81
irb(main):047:0>

> なので、windowsじゃなくても使えないと思いますよん。
> 
> gdkwindowを持たない widget群は window systemからの eventつまり signalな
> んかを受け取る事ができないので clicked signalにhandlerを connectする事は
> できません。たとえできても呼ばれないしね(^^
> 
> GGADにその辺は書いてあります。
> http://developer.gnome.org/doc/GGAD/ggad.html
> 
> vbox widgetの referenceはこちら。
> http://developer.gnome.org/doc/API/gtk/gtkvbox.html

ありがとうございます。
プログラミング自体あまり経験がないので、いろいろと勉強してみます。

ちょっと長くなってしまうのですが、今かいているスクリプトを添付し
ますので、他にもおかしなところがありましたら、ご指摘頂けませんで
しょうか。
よろしくお願い致します。

#!/usr/bin/env ruby
#
# Ruby/Gtkによるプログラミングからのパクリ
#  (http://ruby.freak.ne.jp/gtk/)
#

require "gtk"

#===============================================
# GTK+での画面生成
#===============================================
# Main Window の生成
window = Gtk::Window.new(Gtk::WINDOW_TOPLEVEL)

# メニュー部分の作成
mbar = Gtk::MenuBar.new

# "File" メニューの生成 -> 'Open','Save','Quit'
filemitem1 = Gtk::MenuItem.new('File')
filemitem1.show
filemenu1 = Gtk::Menu.new
item11 = Gtk::MenuItem.new('Open')
item11.show
filemenu1.add item11
item12 = Gtk::MenuItem.new('Save')
item12.show
filemenu1.add item12
item13 = Gtk::MenuItem.new('Quit')
item13.show
filemenu1.add item13
filemitem1.set_submenu filemenu1
mbar.append filemitem1

# "Edit" メニューの生成 -> 'Run','Delete Item'
filemitem2 = Gtk::MenuItem.new('Edit')
filemitem2.show
filemenu2 = Gtk::Menu.new
item21 = Gtk::MenuItem.new('Run')
item21.show
filemenu2.add item21
item22 = Gtk::MenuItem.new('Delete Item')
item22.show
filemenu2.add item22
filemitem2.set_submenu filemenu2
mbar.append filemitem2

mbar.show

# テキスト表示部分とスクロールバーの作成
vadj = Gtk::Adjustment.new(0,0,0,0,0,0)
text = Gtk::Text.new(nil, vadj)
vs = Gtk::VScrollbar.new(vadj)
text.set_editable true

# 選択済みファイル名表示部分の作成
clist = Gtk::CList.new(['Selected File'])
clist.set_selection_mode(3)
# selection_mode について
#  0: 一個だけしか選択できない
#  1: 一個だけしか選択できない
#  2: 複数選択可能 ただし shiftとctrlの区別なし
#  3: 複数選択可能 shiftとctrlの区別あり
#clist.set_usize(100,200)
#clist.set_column_width 0,100

# ファイル名表示部分,テキスト表示部分とスクロールバーのパック
hbox = Gtk::HBox.new(false, 0)
hbox.pack_start clist, true, true, 0
hbox.pack_start text, true, true, 0
hbox.pack_start vs, false, false, 0
hbox.show

# メニュー部分とそれ以外の部分のパック
vbox = Gtk::VBox.new(false, 0)
vbox.pack_start mbar, false, false, 0
vbox.pack_start hbox, true, true, 0
vbox.show

# FileSelectionの生成
fs = Gtk::FileSelection.new('')

# OKボタンを押した時 ファイル名を取得
fs.ok_button.signal_connect('clicked') {
  fs.hide
  $callback.call fs.get_filename
}
# Canselボタンを押した時 画面の消去
fs.cancel_button.signal_connect('clicked') {
  fs.hide
}

# Open を選択した時
#   Clistにファイル名を表示 Textにファイルの内容を表示
item11.signal_connect('activate') {
  fs.set_title('Open File')
  $callback = proc {|filename|
	clist.append ["#{filename}"]
	text.set_point(0)
    text.forward_delete(text.get_length)
    open(filename) {|f| text.insert_text(f.read, 0)}
  }
  fs.show
}

# Save を選択した時
#   ???
item12.signal_connect('activate') {
  fs.set_title 'Save File'
  $callback = proc {|filename|
    open(filename, 'w+') {|f| f.write(text.get_chars(0, -1))}
  }
  fs.show
}

# Quit を選択した時
#   終了
item13.signal_connect('activate') {
  exit
}

# Run を選択した時
#   集計処理を実行
item21.signal_connect('activate') {
  filelist = get_file_list(clist)
  software_list = make_soft_list(filelist)
  license_list, pc_list = get_total_license(software_list)
  put_results(license_list,pc_list,text)
}

# Delete Item を選択した時
#   選択されたファイルをファイルリストから削除
item22.signal_connect('activate') {
  cr = clist.focus_row
  text.set_point(0)
  text.forward_delete(text.get_length)
  clist.remove_row(cr)
  window.show
}

# 各ウィジェットの表示とメインループ
window.add vbox
mbar.show
clist.show
text.show
vs.show
hbox.show
window.show
Gtk.main