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.pscrollbar = xfl.fl_add_scrollbar(xfl.FL_HOR_PLAIN_SCROLLBAR, 40, 40, 250, 50, 'A common scrollbar') xfl.fl_set_object_boxtype(self.pscrollbar, xfl.FL_DOWN_BOX) xfl.fl_set_scrollbar_bounds(self.pscrollbar, 1, 5) xfl.fl_set_scrollbar_value(self.pscrollbar, 1) xfl.fl_set_scrollbar_increment(self.pscrollbar, 0.5, 0.05) xfl.fl_set_scrollbar_size(self.pscrollbar, 0.20) xfl.fl_set_scrollbar_step(self.pscrollbar, 1.000) xfl.fl_set_object_color(self.pscrollbar, xfl.FL_COL1, xfl.FL_COL1) xfl.fl_set_object_lalign(self.pscrollbar, xfl.FL_ALIGN_BOTTOM) xfl.fl_set_object_lstyle(self.pscrollbar, xfl.FL_NORMAL_STYLE) xfl.fl_set_object_lsize(self.pscrollbar, xfl.FL_DEFAULT_SIZE) xfl.fl_set_object_lcol(self.pscrollbar, xfl.FL_BLACK) xfl.fl_set_object_resize(self.pscrollbar, xfl.FL_RESIZE_X) xfl.fl_set_object_gravity(self.pscrollbar, xfl.FL_NoGravity, xfl.FL_NoGravity) xfl.fl_set_object_shortcut(self.pscrollbar, 'r', 1) xfl.fl_set_object_callback(self.pscrollbar, self.scrollbarcb, 3) xfl.fl_set_object_return(self.pscrollbar, xfl.FL_RETURN_END_CHANGED) xfl.fl_end_form()
def create_form_scb(self): fdui = FD_scb() fdui.scb = xfl.fl_bgn_form(xfl.FL_NO_BOX, 470, 230) pobj = xfl.fl_add_box(xfl.FL_UP_BOX, 0, 0, 470, 230, "") fdui.hor = xfl.fl_add_scrollbar(xfl.FL_HOR_SCROLLBAR, 30, 15, \ 230, 17, "HOR_SCROLLBAR") xfl.fl_set_object_lsize(fdui.hor, xfl.FL_TINY_SIZE) xfl.fl_set_object_resize(fdui.hor, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.hor, self.noop_cb, 0) fdui.hor_thin = xfl.fl_add_scrollbar(xfl.FL_HOR_THIN_SCROLLBAR, \ 30, 60, 230, 18, "HOR_THIN_SCROLLBAR") xfl.fl_set_object_boxtype(fdui.hor_thin, xfl.FL_DOWN_BOX) xfl.fl_set_object_lsize(fdui.hor_thin, xfl.FL_TINY_SIZE) xfl.fl_set_object_resize(fdui.hor_thin, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.hor_thin, self.noop_cb, 0) xfl.fl_set_scrollbar_value(fdui.hor_thin, 0.11) fdui.hor_nice = xfl.fl_add_scrollbar(xfl.FL_HOR_NICE_SCROLLBAR, \ 30, 110, 230, 18, "HOR_NICE_SCROLLBAR") xfl.fl_set_object_boxtype(fdui.hor_nice, xfl.FL_FRAME_BOX) xfl.fl_set_object_lsize(fdui.hor_nice, xfl.FL_TINY_SIZE) xfl.fl_set_object_resize(fdui.hor_nice, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.hor_nice, self.noop_cb, 0) fdui.vert = xfl.fl_add_scrollbar(xfl.FL_VERT_SCROLLBAR, 300, 10, \ 17, 185, "") xfl.fl_set_object_resize(fdui.vert, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.vert, self.noop_cb, 0) fdui.vert_thin = xfl.fl_add_scrollbar(xfl.FL_VERT_THIN_SCROLLBAR, \ 338, 10, 17, 185, "") xfl.fl_set_object_boxtype(fdui.vert_thin, xfl.FL_DOWN_BOX) xfl.fl_set_object_resize(fdui.vert_thin, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.vert_thin, self.noop_cb, 0) fdui.hide = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 20, 195, \ 80, 25, "Hide") xfl.fl_set_object_lalign(fdui.hide, xfl.FL_ALIGN_CENTER) xfl.fl_set_object_callback(fdui.hide, self.hide_cb, 0) fdui.deactivate = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 100, 195, \ 80, 25, "Deactivate") xfl.fl_set_object_lalign(fdui.deactivate, xfl.FL_ALIGN_CENTER) xfl.fl_set_object_callback(fdui.deactivate, self.deactivate_cb, 0) pobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 200, 195, \ 80, 25, "Done") xfl.fl_set_object_lalign(pobj, xfl.FL_ALIGN_CENTER) xfl.fl_set_object_callback(pobj, self.done_cb, 0) fdui.vert_nice = xfl.fl_add_scrollbar(xfl.FL_VERT_NICE_SCROLLBAR, \ 370, 10, 17, 185, "") xfl.fl_set_object_boxtype(fdui.vert_nice, xfl.FL_FRAME_BOX) xfl.fl_set_object_resize(fdui.vert_nice, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(fdui.vert_nice, self.noop_cb, 0) xfl.fl_set_scrollbar_value(fdui.vert_nice, 1) pobj = xfl.fl_add_scrollbar(xfl.FL_HOR_PLAIN_SCROLLBAR, 30, 155, \ 230, 18, "HOR_PLAIN_SCROLLBAR") xfl.fl_set_object_boxtype(pobj, xfl.FL_DOWN_BOX) xfl.fl_set_object_lsize(pobj, xfl.FL_TINY_SIZE) xfl.fl_set_object_resize(pobj, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(pobj, self.noop_cb, 0) xfl.fl_set_scrollbar_value(pobj, 0.77) xfl.fl_set_scrollbar_size(pobj, 0.20) pobj = xfl.fl_add_scrollbar(xfl.FL_VERT_PLAIN_SCROLLBAR, 410, 10, \ 17, 185, "") xfl.fl_set_object_boxtype(pobj, xfl.FL_DOWN_BOX) xfl.fl_set_object_resize(pobj, xfl.FL_RESIZE_ALL) xfl.fl_set_object_callback(pobj, self.noop_cb, 0) xfl.fl_set_scrollbar_value(pobj, 0.97) xfl.fl_set_scrollbar_size(pobj, 0.20) xfl.fl_end_form() return fdui