eiffel-iup/examples/tutorial/hello_world_2.e

class HELLO_WORLD_2

insert
	IUP_INTERFACE

create {ANY}
   make

feature {ANY}

   make
      local
			s: STRING
			gui: IUP
			dlg: IUP_DIALOG
			label: IUP_LABEL
			vb: IUP_VBOX
      do
			gui := iup_open

			create label.label("Hello world from IUP.")
			create vb.vbox({ARRAY[IUP_WIDGET] 1, << label >>})

			create dlg.dialog(vb)
			dlg.set_title("Hello World 2")
			s := dlg.show_predefined_xy("IUP_CENTER", "IUP_CENTER")

         gui.main_loop
			gui.close
      end
      
end