PRAGMA LDFLAGS `pkg-config --libs elementary`PRAGMA OPTIONS `pkg-config --cflags elementary`
PRAGMA INCLUDE elementary-1/Elementary.h
'--- ported the first elementary widget to BaCon bigbass
'---GUI
PROTO elm_policy_set
PROTO elm_win_util_standard_add
PROTO elm_win_autodel_set
PROTO evas_object_resize
PROTO evas_object_show
PROTO elm_run
PROTO elm_shutdown
PROTO elm_init
elm_init(0,0)
DECLARE *win TYPE Evas_Object
'--- simulate ELM_MAIN macro what a mess that was to sort out
'--- test the GUI a simple window
elm_policy_set(ELM_POLICY_QUIT, ELM_POLICY_QUIT_LAST_WINDOW_CLOSED)
win = elm_win_util_standard_add("bg-plain", "Bg Plain")
elm_win_autodel_set(win, EINA_TRUE)
evas_object_resize(win, 320, 320)
evas_object_show(win)
elm_run()
elm_shutdown()
PRAGMA INCLUDE elementary-1/Elementary.h
'--- ported the first elementary widget to BaCon bigbass
'---GUI
PROTO elm_policy_set
PROTO elm_win_util_standard_add
PROTO elm_win_autodel_set
PROTO evas_object_resize
PROTO evas_object_show
PROTO elm_run
PROTO elm_shutdown
PROTO elm_init
elm_init(0,0)
DECLARE *win TYPE Evas_Object
'--- simulate ELM_MAIN macro what a mess that was to sort out
'--- test the GUI a simple window
elm_policy_set(ELM_POLICY_QUIT, ELM_POLICY_QUIT_LAST_WINDOW_CLOSED)
win = elm_win_util_standard_add("bg-plain", "Bg Plain")
elm_win_autodel_set(win, EINA_TRUE)
evas_object_resize(win, 320, 320)
evas_object_show(win)
elm_run()
elm_shutdown()