added eugtk examples
This commit is contained in:
24
eugtk/examples/glade/paned.ex
Normal file
24
eugtk/examples/glade/paned.ex
Normal file
@@ -0,0 +1,24 @@
|
||||
|
||||
--# Simple paned window
|
||||
|
||||
include GtkEngine.e
|
||||
|
||||
add(builder,"~/demos/glade/paned.glade")
|
||||
|
||||
main()
|
||||
|
||||
------------------------------------------------------------------------
|
||||
global function on_button2_clicked()
|
||||
------------------------------------------------------------------------
|
||||
Info("window1","Help","GtkPaned",
|
||||
"Grab and slide the bar\nbetween Mongoose and license text")
|
||||
return 1
|
||||
end function
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user