added eugtk examples
This commit is contained in:
17
eugtk/examples/resources/a.e
Normal file
17
eugtk/examples/resources/a.e
Normal file
@@ -0,0 +1,17 @@
|
||||
namespace a
|
||||
|
||||
include GtkEngine.e
|
||||
|
||||
export constant color = "red"
|
||||
|
||||
constant win = create(GtkWindow,{ -- this window is NOT exported
|
||||
{"name","a:window"}, -- note that this name must include the namespace!
|
||||
{"move",200,300},
|
||||
{"title","Window A"}})
|
||||
|
||||
show_all(win)
|
||||
|
||||
export function clear()
|
||||
set(win,"background",#dddddd)
|
||||
return 1
|
||||
end function
|
||||
Reference in New Issue
Block a user