$PBExportHeader$m_dft_dwprint_print_item_other.srm
$PBExportComments$超级菜单
forward
global type m_dft_dwprint_print_item_other from menu
end type
type m_默认格式 from menu within m_dft_dwprint_print_item_other
end type
global type m_dft_dwprint_print_item_other from menu
m_默认格式 m_默认格式
end type
end forward

shared variables

end variables

global type m_dft_dwprint_print_item_other from menu
m_默认格式 m_默认格式
end type
global m_dft_dwprint_print_item_other m_dft_dwprint_print_item_other

type variables

end variables

forward prototypes
public subroutine f1 ()
end prototypes

public subroutine f1 ();
end subroutine

on m_dft_dwprint_print_item_other.create
m_dft_dwprint_print_item_other=this
call super::create
this.text = "m_dft_dwprint_print_item_other"
this.m_默认格式=create m_默认格式
this.Item[UpperBound(this.Item)+1]=this.m_默认格式
end on

on m_dft_dwprint_print_item_other.destroy
call super::destroy
destroy(this.m_默认格式)
end on

type m_默认格式 from menu within m_dft_dwprint_print_item_other
end type

event clicked;If upperbound(item) = 0 Then
	IF  IsValid(w_curwin) THEN
		w_curwin.triggerevent('ue_print_other',long(tag),long(tag))
	else
		w_curwin.triggerevent('ue_print_other',0,0)
	end if
end if
end event

on m_默认格式.create
call super::create
this.text = "默认格式"
end on

on m_默认格式.destroy
call super::destroy
end on