added eugtk examples
This commit is contained in:
14
eugtk/examples/glade/ca.e
Normal file
14
eugtk/examples/glade/ca.e
Normal file
@@ -0,0 +1,14 @@
|
||||
namespace ca
|
||||
|
||||
include GtkEngine.e
|
||||
|
||||
constant flag = canonical_path("~/demos/resources/flags/flags-canada.png")
|
||||
set("image5","from pixbuf",create(GdkPixbuf,flag,-1,15,1))
|
||||
|
||||
export function hello(atom ctl, atom data)
|
||||
set(data,"markup","Nice day, eh?")
|
||||
return 1
|
||||
end function
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user