INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Button group control"
project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: grape
class BUTTON_GROUP
inherit

GROUP
rename
make as g_make
redefine
add,
init,
insert,
on_parent_resize
end
creation

make
feature

HORIZONTAL: INTEGER

VERTICAL: INTEGER

default_interleave: INTEGER

border_size: INTEGER

gb: GROUP_BOX

type: INTEGER

interleave: REAL

autowidth: BOOLEAN

make (title: STRING; r: RECT; typ: INTEGER; autowd: BOOLEAN; interleav: REAL)

init

add (b: BUTTON)

insert (b, before: BUTTON)

on_parent_resize (w, h: INTEGER)

own_physical_size

calculate_size
end -- class BUTTON_GROUP

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES