exerbtk/test/form_event.rb

#! /usr/bin/ruby

#==============================================================================#
# $Id: form_event.rb,v 1.3 2004/01/25 05:25:40 yuya Exp $
#==============================================================================#

require 'etk/etk'

#==============================================================================#

class MyForm < Etk::Form

  def initialize
    self.set_client_size(300, 200)
  end

  def on_load(arg)
    p([:on_load, arg])
  end

  def on_disposed(arg)
    p([:on_disposed, arg])
  end

  def on_closed(arg)
    p([:on_closed, arg])
  end

  def on_click(arg)
    p([:on_click, arg])
  end

  def on_doubleclick(arg)
    p([:on_doubleclick, arg])
  end

  def on_mouse_down(arg)
    p([:on_mouse_down, arg])
  end

  def on_mouse_up(arg)
    p([:on_mouse_up, arg])
  end

end

#==============================================================================#

Etk.main(MyForm.new)

#==============================================================================#
#==============================================================================#