[ruby-list:26135] Re: validatecommand etc. of TkEntry

永井＠知能．九工大です．

From: [e-mail]
Subject: [ruby-list:26074] Re: validatecommand etc. of TkEntry
Date: Fri, 17 Nov 2000 11:58:41 +0900
Message-ID: <[e-mail]>
n> もう少し，強化してみました．
n> 
n>   e.validatecommand(proc{|v,w| w.insert('end',"hoge #{v}"); '1'}, '%V %W')
n> 
n> の他，
n> 
n>   e = TkEntry.new(nil, 'width'=>20, 'validate'=>'focusin', 
n>                   'validatecommand'=>TkEntry::ValidateCmd.new(
n>                      proc{|v,w| w.insert('end',"hoge #{v}"); '1'}, '%V %W')
n>                  ).pack
n> 
n> というようにもできるようにしてみました．

さらに手を加えました．
わざわざ TkEntry::ValidateCmd.new としなければならないのもなんですので，

  e = TkEntry.new(nil, 'width'=>20, 'validate'=>'focusin', 
                  'validatecommand'=>
                     [ proc{|v,w| w.insert('end',"hoge #{v}"); '1'}, '%V %W' ]
                 ).pack

というように，[ proc, args ] の配列での指定も可能としました．
イベントのパラメータをすべて受け取るのなら，

  e = TkEntry.new(nil, 'width'=>20, 'validate'=>'focusin', 
                  'validatecommand'=> proc{|param| 
                     param.widget.insert('end',"hoge #{param.triggered}"); '1'}
                 ).pack

でも OK です．

その他としては，

 ・ Tk.after_idle の追加
 ・ Tk.clock_clicks, Tk.clock_format, Tk.clock_formatGMT, 
         Tk.clock_scan, Tk.clock_scanGMT, clock_seconds の追加
 ・ TkPack.info, TkPack.slaves の追加
 ・ TkPack.propagate の改修
 ・ TkGrid.columnconfiginfo, TkGrid.rowconfiginfo の追加
 ・ TkGrid.propagate, TkGrid.slaves の改修
 ・ TkPlace モジュールの追加
 ・ TkWindow#pack_forget, TkWindow#pack_propagate の追加
 ・ TkWindow#pack_config, TkWindow#pack_info の改修
 ・ TkWindow#grid_forget, TkWindow#grid_bbox, TkWindow#grid_config, 
        TkWindow#grid_columnconfig, TkWindow#grid_rowconfig, 
        TkWindow#grid_columnconfiginfo, TkWindow#gridrowconfiginfo, 
        TkWindow#grid_info, TkWindow#grid_location, TkWindow#grid_propagate, 
        TkWindow#grid_remove, TkWindow#grid_size, TkWindow#grid_slaves の追加
 ・ TkWindow#place_config の改修
 ・ TkWindow#place_configinfo の追加
 ・ キャンバスアイテムの -dash, -activedash, -disableddash オプション対応の改修
 ・ TkMacResource モジュールの追加 ( 環境がないため無試験 )
 ・ TkWinDDE モジュールの追加      ( 環境がないため無試験 )
 ・ TkWinRegistry モジュールの追加 ( 環境がないため無試験 )

といったところです．よければ試してみてください．

ただ，TkMacResource, TkWinDDE, TkWinRegistry モジュールについては，
手元に環境がないため，テストされていません．
それどころか，どんなものが返されるのかもよくわかっていないので，
Tcl の man pages から想定して作成した状態です．(^_^;
環境をお持ちの方はテストしてみていただけると助かります．(_O_)

ruby-1.6.1 のオリジナルのソースに対して
前回までの私のパッチをあてたものからの差分になっています．
-- 
                                         永井 秀利 （九工大 知能情報）
                                             [e-mail]