def __init__(self, lsysargv, sysargv):
xfl.fl_initialize(lsysargv, sysargv, "FormDemo", None, 0)
pform = xfl.fl_bgn_form(xfl.FL_UP_BOX, 130, 100)
self.pbr = xfl.fl_add_browser(xfl.FL_NORMAL_BROWSER, 5, 5, 95, 90, \
"")
pbut = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 105, 5, 20, 8, \
"Exit")
pobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 105, 75, 20, 8, \
"Load")
xfl.fl_set_object_callback(pobj, self.load_file, 0)
pobj = xfl.fl_add_lightbutton(xfl.FL_RADIO_BUTTON, 105, 60, 20, 8, \
"Small")
xfl.fl_set_object_callback(pobj, self.set_size, xfl.FL_SMALL_SIZE)
xfl.fl_call_object_callback(pobj)
xfl.fl_set_button(pobj, 1)
pobj = xfl.fl_add_lightbutton(xfl.FL_RADIO_BUTTON, 105, 50, 20, 8, \
"Normal")
xfl.fl_set_object_callback(pobj, self.set_size, xfl.FL_NORMAL_SIZE)
pobj = xfl.fl_add_lightbutton(xfl.FL_RADIO_BUTTON, 105, 40, 20, 8, \
"Large")
xfl.fl_set_object_callback(pobj, self.set_size, xfl.FL_LARGE_SIZE)
xfl.fl_end_form()
xfl.fl_scale_form(pform, 4.0, 4.0)
xfl.fl_adjust_form_size(pform)
xfl.fl_clear_browser(self.pbr)
xfl.fl_add_browser_line(self.pbr, "LOAD A FILE.")
xfl.fl_show_form(pform, xfl.FL_PLACE_FREE, xfl.FL_FULLBORDER, \
"Browser")
while True:
pobj = xfl.fl_do_forms()
if xfl.fl_is_same_object(pobj, pbut):
break
xfl.fl_hide_form(pform)
xfl.fl_finish()
def fill_browser(pobj):
nfiles = 0
dl, nfiles = xfl.fl_get_dirlist( ".", "*", 0)
xfl.fl_freeze_form(pobj.contents.form)
buf = "Total %d files" % nfiles
xfl.fl_set_object_label(fd_fbform.total, buf)
xfl.fl_clear_browser(fd_fbform.browser)
for ds in range(0, nfiles):
buf = "%-10s\t%5ldK\t%s\n" % (dl[ds].name, \
dl[ds].dl_size >> 10, time.ctime(dl[ds].dl_mtime))
xfl.fl_addto_browser_chars(fd_fbform.browser, buf)
xfl.fl_unfreeze_form(pobj.contents.form)
def __init__(self, lsysarg, sysargv):
xfl.fl_initialize(lsysarg, sysargv, "FormDemo", None, 0)
fdnew = self.create_form()
xfl.fl_clear_browser(self.pbr)
xfl.fl_add_browser_line(self.pbr, "LOAD A FILE.")
xfl.fl_set_browser_fontstyle(self.pbr, xfl.FL_FIXED_STYLE)
xfl.fl_show_form(fdnew, xfl.FL_PLACE_FREE, xfl.FL_FULLBORDER, \
"Browser")
poret = xfl.fl_do_forms()
if poret.contents.label:
prndata = poret.contents.label
else:
prndata = ""
message = "%p %d %s\n" % (poret.contents, poret.contents.objclass, prndata)
print(message)
xfl.fl_hide_form(fdnew)
xfl.fl_free_form(fdnew)
xfl.fl_finish()
def test_fl_clear_browser(self):
"""fl_clear_browser(ptr_flobject)"""
xfl.fl_clear_browser(149, 1.0, 4, )
def clear_list(self, pobj, what):
xfl.fl_clear_browser(self.fd_canvasform.br)
def resetlog_cb(self, pobj, data):
xfl.fl_clear_browser(self.fd_form0.br)
def clearit(self, pobj, arg):
xfl.fl_clear_browser(self.pbrowserobj)
