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

12
eugtk/examples/test89.ex Normal file
View File

@@ -0,0 +1,12 @@
--# Warning dialog
include GtkEngine.e
-- Setting the dialog icon and the dialog titlebar icon from a pixbuf;
-- titlebar icon may or may not be visible, depending upon the theme in use;
atom clown1 = create(GdkPixbuf,"thumbnails/clown.png",80,80,1)
Warn(0,,"You are confused"," (but this is your normal state)",,clown1,clown1)