环境:PowerBuilder9.03 8336
//////////////////////////////////////////////////////////////////////////////
//
// 变量: Instance Variables
//
// 功能: 实例变量
//
//////////////////////////////////////////////////////////////////////////////
public:
string is_text
//////////////////////////////////////////////////////////////////////////////
//
// 函数: of_menu
//
// 属性: public
//
// 参数: menu am_menu
//
// 返回: integer
//
// 功能: Menu算法
//
//////////////////////////////////////////////////////////////////////////////
//声明
integer li_for
//检测
if not IsValid(am_menu) then return -1
for li_for = 1 to upperbound(am_menu.item)
am_menu.item[li_for].text = is_text + string(li_for,"00")
next
for li_for = 1 to upperbound(am_menu.item)
if upperbound(am_menu.item[li_for].item) > 0 then
is_text = am_menu.item[li_for].text
of_menu(am_menu.item[li_for]) //子集
end if
next
return 1
