pb11.5 菜单编程问题
menu lm_templateinteger iiPosiiPos = upperbound(am_menu.item)+1lm_template = create m_constructoram_menu.item[iiPos] = lm_template.item[1]am_menu.item[iiPos].text=as_textam_menu.item[iiPos].tag =as_tagam_menu.item[iipos].microhelp = as_mhelpif as_checked = '1' then //am_menu.item[iipos].checked = true //am_menu.item[iipos].toolbaritemdown = trueend ifam_menu.item[iipos].toolbaritemtext = as_tooltext[color=#FF0000]am_menu.item[iipos].toolbarItemName = "\bmp\ico\arrow2.ico"[/color]//if isnull(as_space) or as_space < 0 then as_space = 0am_menu.item[iipos].ToolbarItemspace = as_spaceif isnull(as_index) or as_index < 1 then as_space = 1am_menu.item[iipos].ToolbarItemBarIndex = as_indexam_menu.item[iipos].ToolbarItemorder = as_order//