Q5/ws_objects/Ew_mainface.pbl.src/m_sys_download.srm

$PBExportHeader$m_sys_download.srm
forward
global type m_sys_download from menu
end type
type m_后台服务管理 from menu within m_sys_download
end type
type m_- from menu within m_sys_download
end type
type m_功能升级日志 from menu within m_sys_download
end type
global type m_sys_download from menu
m_后台服务管理 m_后台服务管理
m_- m_-
m_功能升级日志 m_功能升级日志
end type
end forward

global type m_sys_download from menu
m_后台服务管理 m_后台服务管理
m_- m_-
m_功能升级日志 m_功能升级日志
end type
global m_sys_download m_sys_download

on m_sys_download.create
m_sys_download=this
call super::create
this.text = "m_sys_update"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
this.m_后台服务管理=create m_后台服务管理
this.m_-=create m_-
this.m_功能升级日志=create m_功能升级日志
this.Item[UpperBound(this.Item)+1]=this.m_后台服务管理
this.Item[UpperBound(this.Item)+1]=this.m_-
this.Item[UpperBound(this.Item)+1]=this.m_功能升级日志
end on

on m_sys_download.destroy
call super::destroy
destroy(this.m_后台服务管理)
destroy(this.m_-)
destroy(this.m_功能升级日志)
end on

type m_后台服务管理 from menu within m_sys_download
end type

event clicked;IF NOT sys_power_issuper THEN
	MessageBox('提示','你没有使用权限！', Information!, OK! )
	RETURN
END IF

open(w_ljsmc_services)
end event

on m_后台服务管理.create
call super::create
this.text = "智能升级"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_后台服务管理.destroy
call super::destroy
end on

type m_- from menu within m_sys_download
end type

on m_-.create
call super::create
this.text = "-"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_-.destroy
call super::destroy
end on

type m_功能升级日志 from menu within m_sys_download
end type

on m_功能升级日志.create
call super::create
this.text = "功能升级日志"
this.menutextcolor = 134217735
this.menubackcolor = 134217732
this.menuhighlightcolor = 134217741
this.textsize = 8
this.weight = 400
this.facename = "Tahoma"
this.titlebackcolor = 134217730
this.bitmapbackcolor = 12632256
this.menubitmaps = true
this.titlegradient = true
this.toolbartextcolor = 134217746
this.toolbarbackcolor = 67108864
this.toolbarhighlightcolor = 134217741
this.toolbargradient = true
this.bitmapgradient = true
end on

on m_功能升级日志.destroy
call super::destroy
end on

event clicked;f_sys_main(844)
end event