INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: grape
class TREE_VIEWER [G -> COMPONENT]
inherit

WINDOW
rename
make as w_make
redefine
init,
on_changed,
on_double_clicked
end

TREE_VIEWER_ATTRIBUTES
end
creation

make
feature

tree: TREE [G]

bvp: BRANCH_VIEW_PANEL [G]

lvp: LEAF_VIEW_PANEL [G]

make (s: STRING; re: RECT; ctx: INTEGER; tr: TREE [G])

expand_branch

collapse_branch

expand_all

level_up

change_tree (new_tree: TREE [G])

change_leaf_columns (delta: INTEGER)

get_leaf_columns: INTEGER

display_leaves

set_font (f: FONT)

on_changed (t: TILE): INTEGER

on_double_clicked (t: TILE): INTEGER

init

tree_path: STRING

bvp_path: STRING
end -- class TREE_VIEWER

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES