def create_form(self):
self.pform = xfl.fl_bgn_form(xfl.FL_NO_BOX, 420, 360)
xfl.fl_add_box(xfl.FL_UP_BOX, 0, 0, 420, 360, "")
xfl.fl_add_input(xfl.FL_NORMAL_INPUT, 70, 300, 320, 30, "Name")
xfl.fl_add_input(xfl.FL_NORMAL_INPUT, 70, 260, 320, 30, "Address")
xfl.fl_add_input(xfl.FL_NORMAL_INPUT, 70, 220, 320, 30, "City")
xfl.fl_add_input(xfl.FL_NORMAL_INPUT, 70, 180, 320, 30, "Country")
psexobj = xfl.fl_add_select(xfl.FL_NORMAL_SELECT, 70, 130, \
110, 30, "Sex")
pmaleent = xfl.fl_add_select_items(psexobj, "Male%SM")
xfl.fl_popup_entry_set_callback(pmaleent, self.cb)
xfl.fl_popup_entry_set_state(pmaleent, xfl.FL_POPUP_NONE) # 0
xfl.fl_popup_entry_set_shortcut(pmaleent, "M")
pfemaleent = xfl.fl_add_select_items(psexobj, "Female%SF")
xfl.fl_popup_entry_set_callback(pfemaleent, self.cb)
xfl.fl_popup_entry_set_state(pfemaleent, xfl.FL_POPUP_NONE) # 0
xfl.fl_popup_entry_set_shortcut(pfemaleent, "F")
xfl.fl_set_object_shortcut(psexobj, "S", 1)
pchildobj = xfl.fl_add_select(xfl.FL_MENU_SELECT, 280, 130, 110, 30, \
"Children")
xfl.fl_add_select_items(pchildobj, "Zero|One|Two|Three|Four|Many")
xfl.fl_set_object_shortcut(pchildobj, "C", 1)
xfl.fl_popup_set_title(xfl.fl_get_select_popup(pchildobj), "Kids")
plicenceobj = xfl.fl_add_select(xfl.FL_NORMAL_SELECT, 280, 80, \
110, 30, "Licence")
xfl.fl_add_select_items(plicenceobj, "Yes|No")
xfl.fl_set_select_policy(plicenceobj, xfl.FL_POPUP_DRAG_SELECT)
pmarriedobj = xfl.fl_add_select(xfl.FL_DROPLIST_SELECT, 70, 80, \
110, 27, "Married")
xfl.fl_add_select_items(pmarriedobj, "Yes|No")
self.preadyobj = xfl.fl_add_button(xfl.FL_NORMAL_BUTTON, 150, 20, \
140, 30, "Quit")
xfl.fl_set_object_callback(self.preadyobj, self.exitcb, 0)
xfl.fl_end_form()
def add_items_to_menu1(self):
pitem1menu1 = xfl.fl_add_nmenu_items(self.pmenu1, "Red%SR")
pitem1menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem1menu1, "Rr#R#r")
xfl.fl_popup_entry_set_state(pitem1menu1, xfl.FL_POPUP_DISABLED)
pitem2menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem1menu1, \
"Green%SG")
pitem2menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem2menu1, "Gg#G#g")
xfl.fl_popup_entry_set_state(pitem2menu1, xfl.FL_POPUP_DISABLED)
pitem3menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem2menu1, \
"Yellow%SY")
pitem3menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem3menu1, "Yy#Y#y")
xfl.fl_popup_entry_set_state(pitem3menu1, xfl.FL_POPUP_DISABLED)
pitem4menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem3menu1, \
"Blue%SB")
pitem4menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem4menu1, "Bb#B#b")
xfl.fl_popup_entry_set_state(pitem4menu1, xfl.FL_POPUP_DISABLED)
pitem5menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem4menu1, \
"Purple%SP")
pitem5menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem5menu1, "Pp#P#p")
xfl.fl_popup_entry_set_state(pitem5menu1, xfl.FL_POPUP_NONE)
pitem6menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem5menu1, \
"Cyan%SC")
pitem6menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem6menu1, "Cc#C#c")
xfl.fl_popup_entry_set_state(pitem6menu1, xfl.FL_POPUP_NONE)
pitem7menu1 = xfl.fl_insert_nmenu_items(self.pmenu1, pitem6menu1, \
"White%SW")
pitem7menu1.contents.type = xfl.FL_POPUP_RADIO
xfl.fl_popup_entry_set_shortcut(pitem7menu1, "Ww#W#w")
xfl.fl_popup_entry_set_state(pitem7menu1, xfl.FL_POPUP_NONE)
