イベントハンドラについて

[nasuB]

こにゃにゃちわ。

リゾート地で、バケーションだったのですっかり焼きナス状態です。

onマクロ使わない方法は、こんなんでいかがっすか？

Code:

{def eh = {EventHandler
                    Action,
                   {proc {e:Event, et:EventTarget}:void
                            {popup-message "Fired....."}
                   }
                }
}
{CommandButton
       label = "fire!",
       eh
}

もしくはコード内でEventHandlerを追加するには、

Code:

{def cb = {CommandButton
                   label = "fire!"
               }
}
{value
    {cb.add-event-handler eh}
     cb
}

ただ、この場合でもonマクロを使った方がシンプルかも。。

Code:

{def eh = {on Action do
                    {popup-message "Fired....."}
               }
}

VLEは分からないので、誰かヘルプ！！


-B