added eugtk examples

This commit is contained in:
2016-11-25 00:33:18 -07:00
parent 87a821e3da
commit c0b98b619e
877 changed files with 96872 additions and 0 deletions

View File

@@ -0,0 +1,20 @@
--# Glade version of test11.ex
include GtkEngine.e
add(builder,"~/demos/glade/test11.glade")
main()
-----------------------------------------------
global function on_button_clicked(Button self)
-----------------------------------------------
switch get(self,"name") do
case "left" then set("label1","justify",GTK_JUSTIFY_LEFT)
case "center" then set("label1","justify",GTK_JUSTIFY_CENTER)
case "right" then set("label1","justify",GTK_JUSTIFY_RIGHT)
end switch
return 1
end function