Powerbuilder-菜单

今天想做一个菜单控制功能，用于软件开发框架中使用，这里进行一些基础知识的学习。主要的知识点：

1.this.Item[UpperBound(this.Item)+1]=this.m_menu1

生成的新的菜单对象存放在item数组中 例子：

integer li_precount,li_itemcount

//新创建一个菜单对象，并将其放到菜单数组im_new[]当中；
ii_count++
im_new[ii_count]=create m_new

//此处对新创建的菜单对象获取引用；
li_precount=upperbound(m_main.item[])
li_itemcount=upperbound(m_main.item[li_precount].item[])
m_main.item[li_precount].item[li_itemcount + 1]=im_new[ii_count].item[1]

//下面是设置新生成菜单的TEXT属性，这个属性可以从数据库中取，但此处省略简化掉了；
if(mod(li_itemcount,2) <>0) then 
	m_main.item[li_precount].item[li_itemcount + 1].text="-" //"新增二级-" + string(li_precount) + "-" + string(li_itemcount + 1)
else
	m_main.item[li_precount].item[li_itemcount + 1].text="新增二级-" + string(li_precount) + "-" + string(li_itemcount + 1)
end if 

//下面是设置新生成菜单的TAG属性，这个属性可以从数据库中取，但此处省略简化掉了；
//通过这个TAG可以当作功能号等来使用，通过gf_menumessage()函数来予以公共处理；
m_main.item[li_precount].item[li_itemcount + 1].tag="ue_test"+ string(li_itemcount + 1)

m_main.item[li_precount].item[li_itemcount + 1].menuimage = "Exit!"
//此处来将新生成的菜单对象显示出来；
//m_main.item[1].hide()
//m_main.item[1].show()