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_valuatorform(self):
fdui = FD_valuatorform()
fdui.valuatorform = xfl.fl_bgn_form(xfl.FL_NO_BOX, 431, 211)
pobj = xfl.fl_add_box(xfl.FL_FLAT_BOX, 0, 0, 431, 211, "")
pobj1 = xfl.fl_add_positioner(xfl.FL_NORMAL_POSITIONER, 280, 50, 82, 72, "")
xfl.fl_set_positioner_xvalue(pobj1, 0.679012)
xfl.fl_set_positioner_yvalue(pobj1, 0.71831)
pobj2 = xfl.fl_add_valslider(xfl.FL_HOR_NICE_SLIDER, 55, 10, 240, 20, "")
xfl.fl_set_object_boxtype(pobj2, xfl.FL_FLAT_BOX)
xfl.fl_set_object_color(pobj2, xfl.FL_COL1, xfl.FL_RIGHT_BCOL)
xfl.fl_set_object_return(pobj2, xfl.FL_RETURN_CHANGED)
xfl.fl_set_slider_value(pobj2, 0.87)
pobj3 = xfl.fl_add_counter(xfl.FL_NORMAL_COUNTER, 130, 110, 110, 20, "")
xfl.fl_set_counter_value(pobj3, -1.0)
pobj4 = xfl.fl_add_slider(xfl.FL_VERT_NICE_SLIDER, 10, 30, 20, 160, "")
xfl.fl_set_object_boxtype(pobj4, xfl.FL_FLAT_BOX)
xfl.fl_set_object_color(pobj4, xfl.FL_COL1, xfl.FL_RED)
xfl.fl_set_object_return(pobj4, xfl.FL_RETURN_CHANGED)
xfl.fl_set_slider_value(pobj4, 0.49)
pobj5 = xfl.fl_add_valslider(xfl.FL_HOR_BROWSER_SLIDER, 70, 170, 150, 21, "")
xfl.fl_set_object_return(pobj5, xfl.FL_RETURN_CHANGED)
pobj6 = xfl.fl_add_slider(xfl.FL_HOR_FILL_SLIDER, 69, 57, 159, 22, "")
xfl.fl_set_object_color(pobj6, xfl.FL_COL1, xfl.FL_SLATEBLUE)
xfl.fl_set_object_return(pobj6, xfl.FL_RETURN_CHANGED)
xfl.fl_set_slider_value(pobj6, 0.25)
pobj7 = xfl.fl_add_dial(xfl.FL_NORMAL_DIAL, 60, 90, 60, 58, "")
xfl.fl_set_object_boxtype(pobj7, xfl.FL_UP_BOX)
xfl.fl_set_object_return(pobj7, xfl.FL_RETURN_END_CHANGED)
pobj8 = xfl.fl_add_scrollbar(xfl.FL_VERT_THIN_SCROLLBAR, 394, 14, 18, 180, "")
xfl.fl_set_object_boxtype(pobj8, xfl.FL_DOWN_BOX)
xfl.fl_set_object_resize(pobj8, xfl.FL_RESIZE_ALL)
xfl.fl_set_scrollbar_size(pobj8, 0.20)
pobj9 = xfl.fl_add_scrollbar(xfl.FL_HOR_SCROLLBAR, 238, 158, 140, 16, "")
xfl.fl_set_object_resize(pobj9, xfl.FL_RESIZE_ALL)
xfl.fl_set_scrollbar_size(pobj9, 0.25)
xfl.fl_end_form()
return fdui
def __init__(self, lsysargv, sysargv):
# application default. Can be overriden by the command line options
xfl.fl_set_border_width(1)
xfl.fl_initialize(lsysargv, sysargv, "FormDemo", None, 0)
self.pbwform = xfl.fl_bgn_form(xfl.FL_NO_BOX, 380, 340)
self.pbwgroup = xfl.fl_bgn_group()
xfl.fl_add_box(xfl.FL_UP_BOX, 0, 0, 380, 340, "")
xfl.fl_add_frame(xfl.FL_EMBOSSED_FRAME, 220, 60, 135, 145, "")
xfl.fl_add_frame(xfl.FL_ENGRAVED_FRAME, 15, 60, 185, 145, "")
xfl.fl_add_slider(xfl.FL_HOR_SLIDER, 25, 70, 160, 20, "")
xfl.fl_add_valslider(xfl.FL_HOR_BROWSER_SLIDER, 25, 105, \
160, 20, "")
self.pobj = xfl.fl_add_scrollbar(xfl.FL_HOR_THIN_SCROLLBAR,
25, 140, 160, 20, "")
xfl.fl_set_scrollbar_size(self.pobj, 0.2)
xfl.fl_add_counter(xfl.FL_NORMAL_COUNTER, 25, 175, \
160, 20, "")
self.ppmobj = xfl.fl_add_pixmapbutton(xfl.FL_NORMAL_BUTTON, \
305, 145, 40, 35, "")
xfl.fl_add_positioner(xfl.FL_NORMAL_POSITIONER, 30, 225, \
100, 80, "")
xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 230, 65, 100, 28, \
"Button")
xfl.fl_add_lightbutton(xfl.FL_PUSH_BUTTON, 230, 98, 100, 28, \
"LightButton")
xfl.fl_add_roundbutton(xfl.FL_PUSH_BUTTON, 230, 128, \
80, 32, "Button")
self.pobj = xfl.fl_add_round3dbutton(xfl.FL_PUSH_BUTTON, \
230, 152, 80, 32, "Button")
xfl.fl_set_object_color(self.pobj, xfl.FL_COL1, xfl.FL_BLUE)
xfl.fl_add_checkbutton(xfl.FL_PUSH_BUTTON, 230, 175, \
80, 32, "Button")
xfl.fl_add_input(xfl.FL_NORMAL_INPUT, 195, 240, 160, 28, \
"Input")
self.pbwselect = xfl.fl_add_select(xfl.FL_MENU_SELECT, 105, \
20, 100, 28, "Border Width")
xfl.fl_set_object_callback(self.pbwselect, self.bw_callback, 0)
xfl.fl_end_group()
self.pdoneobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 270, 290, \
75, 30, "Done")
xfl.fl_set_object_callback(self.pdoneobj, self.done_callback, 0)
xfl.fl_end_form()
# end create_form_bwform
# form initialization code
xfl.fl_set_pixmapbutton_file(self.ppmobj, "crab.xpm")
xfl.fl_add_select_items(self.pbwselect, \
"-5 Pixel|-4 Pixel|-3 Pixel|-2 Pixel|-1 Pixel|" \
" 1 Pixel| 2 Pixel| 3 Pixel| 4 Pixel| 5 Pixel")
pbw = xfl.fl_get_border_width()
if (pbw < -5 or pbw == 0 or pbw > 5):
pbw = -2
xfl.fl_set_border_width(pbw)
txt = "%2d Pixel" % pbw
ppupentr = xfl.fl_get_select_item_by_label(self.pbwselect, txt)
xfl.fl_set_select_item(self.pbwselect, ppupentr)
# show the form
xfl.fl_show_form(self.pbwform, xfl.FL_PLACE_CENTER, \
xfl.FL_TRANSIENT, "bwform")
while xfl.fl_do_forms():
pass # empty
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
