def create_forms(self):
self.sample = xfl.fl_bgn_form(xfl.FL_NO_BOX, 320, 250)
self.ptrflobj0 = xfl.fl_add_box(xfl.FL_UP_BOX, 0, 0, 320, 250, '')
xfl.fl_set_object_color(self.ptrflobj0, xfl.FL_COL1, xfl.FL_COL1)
xfl.fl_set_object_lalign(self.ptrflobj0, xfl.FL_ALIGN_CENTER)
xfl.fl_set_object_lstyle(self.ptrflobj0, xfl.FL_NORMAL_STYLE)
xfl.fl_set_object_lsize(self.ptrflobj0, xfl.FL_DEFAULT_SIZE)
xfl.fl_set_object_lcol(self.ptrflobj0, xfl.FL_BLACK)
xfl.fl_set_object_resize(self.ptrflobj0, xfl.FL_RESIZE_ALL)
xfl.fl_set_object_gravity(self.ptrflobj0, xfl.FL_NoGravity, xfl.FL_NoGravity)
self.pcanvas = xfl.fl_add_canvas(xfl.FL_NORMAL_CANVAS, 60, 60, 210, 120, 'My canvas')
xfl.fl_set_object_boxtype(self.pcanvas, xfl.FL_RFLAT_BOX)
xfl.fl_set_object_color(self.pcanvas, xfl.FL_COL1, xfl.FL_BLACK)
xfl.fl_set_object_lalign(self.pcanvas, xfl.FL_ALIGN_CENTER)
xfl.fl_set_object_lstyle(self.pcanvas, xfl.FL_NORMAL_STYLE)
xfl.fl_set_object_lsize(self.pcanvas, xfl.FL_DEFAULT_SIZE)
xfl.fl_set_object_lcol(self.pcanvas, xfl.FL_BLACK)
xfl.fl_set_object_resize(self.pcanvas, xfl.FL_RESIZE_ALL)
xfl.fl_set_object_gravity(self.pcanvas, xfl.FL_NoGravity, xfl.FL_NoGravity)
xfl.fl_set_object_shortcut(self.pcanvas, 'c', 1)
xfl.fl_set_object_callback(self.pcanvas, self.canvascb, 4)
xfl.fl_end_form()
def create_form_canvasform(self):
fdui = FD_canvasform()
fdui.canvasform = xfl.fl_bgn_form(xfl.FL_NO_BOX, 450, 280)
xfl.fl_add_box(xfl.FL_UP_BOX, 0, 0, 450, 280, "")
fdui.canvas = xfl.fl_add_canvas(xfl.FL_NORMAL_CANVAS, 20, 40, \
155, 187, "")
xfl.fl_set_object_color(fdui.canvas, xfl.FL_BLACK, xfl.FL_COL1)
fdui.br = xfl.fl_add_browser(xfl.FL_NORMAL_BROWSER, 188, 40, \
152, 187, "")
pobj = xfl.fl_add_text(xfl.FL_NORMAL_TEXT, 103, 10, 150, 20, \
"Canvas Events")
xfl.fl_set_object_lsize(pobj, xfl.FL_MEDIUM_SIZE)
xfl.fl_set_object_lalign(pobj, xfl.FL_ALIGN_CENTER)
xfl.fl_set_object_lstyle(pobj, xfl.FL_BOLD_STYLE)
fdui.keyboard = xfl.fl_add_checkbutton(xfl.FL_PUSH_BUTTON, 345, 40, \
76, 26, "Keyboard")
xfl.fl_set_object_color(fdui.keyboard, xfl.FL_COL1, xfl.FL_BLUE)
xfl.fl_set_object_callback(fdui.keyboard, self.sensitive_setting, \
xfl.KeyPress)
fdui.mouse = xfl.fl_add_checkbutton(xfl.FL_PUSH_BUTTON, 345, 70, 76, 26, \
"Buttons")
xfl.fl_set_object_color(fdui.mouse, xfl.FL_COL1, xfl.FL_BLUE)
xfl.fl_set_object_callback(fdui.mouse, self.sensitive_setting, \
xfl.ButtonPress)
fdui.move = xfl.fl_add_checkbutton(xfl.FL_PUSH_BUTTON, 345, 100, 74, 26, \
"Movements")
xfl.fl_set_object_color(fdui.move, xfl.FL_COL1, xfl.FL_BLUE)
xfl.fl_set_object_callback(fdui.move, self.sensitive_setting, \
xfl.MotionNotify)
fdui.misc = xfl.fl_add_checkbutton(xfl.FL_PUSH_BUTTON, 345, 130, \
74, 26, "Enter\nLeave")
xfl.fl_set_object_color(fdui.misc, xfl.FL_COL1, xfl.FL_BLUE)
xfl.fl_set_object_callback(fdui.misc, self.sensitive_setting, \
xfl.EnterNotify)
pobj = xfl.fl_add_button(xfl.FL_PUSH_BUTTON, 30, 240, 90, 27, "Deactivate")
xfl.fl_set_object_callback(pobj, self.disable_it, 0)
pobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 130, 240, 90, 27, \
"Hide canvas")
xfl.fl_set_object_callback(pobj, self.hide_it, 0)
pobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 230, 240, 90, 27, "Clear")
xfl.fl_set_object_callback(pobj, self.clear_list, 0)
xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 330, 240, 90, 27, "Done")
xfl.fl_end_form()
return fdui
