/src/wrappers/gtk/examples/images/images.e
http://github.com/tybor/Liberty · Specman e · 28 lines · 21 code · 6 blank · 1 comment · 0 complexity · c069f8a56326f9ca585ffaecc61589a7 MD5 · raw file
- class IMAGES
- inherit
- GTK_MAIN
- creation
- make
- feature
-
- image: GTK_IMAGE
- window : GTK_WINDOW
-
- make is
- -- Make
- do
- initialize_gtk
- create window.make
- window.set_title ("Images demo")
- window.set_default_size (200,200)
- window.midscreen
- create image.from_file("./test.png")
- window.add (image)
- window.show_all
- gtk_main
- end
- end