INDEX
CLUSTER
FEATURES
SHORT
FRAMES
NO FRAMES
indexing
title:
"Item with sub menu class"
project:
"Visual Eiffel"
revision:
"$Revision: 1.1 $"
copyright:
"Copyright (C) 1996-2005 Object Tools Group"
license:
"http://visual-eiffel.com/license"
cluster:
grape
class
SUB_MENU_ITEM
inherit
MENU_ENTRY
rename
make
as
make_item
redefine
build
,
destroy
,
init
,
internal_refresh
end
creation
load
,
make
,
make_empty
feature
sub_menu
:
MENU
make
(
a_name
:
STRING
;
a_context
:
INTEGER
;
a_menu
:
MENU
)
-- Create a new menu item, which will be added later to some menu
make_empty
(
a_name
:
STRING
;
a_context
:
INTEGER
)
attach_sub_menu
(
submenu
:
MENU
)
init
destroy
build
(
rc
:
RESOURCE_CONTAINER
;
p
:
POINTER
)
end
-- class
SUB_MENU_ITEM
INDEX
CLUSTER
FEATURES
SHORT
FRAMES
NO FRAMES