require 'tk'

def warning( msg )
  ret_value  = TkDialog.new('message'=>'Really quit?', 'buttons'=>'Ok Cancel', 'default'=>1, 'bitmap'=>'warning').value
  msg.text( ret_value )
end

msg = TkMessage.new.pack
TkButton.new(nil, 'text'=>'show dialog', 'command'=>proc{ warning(msg) }).pack

Tk.mainloop