INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Text button 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 TEXT_BUTTON
inherit

BUTTON
rename
make as b_make
redefine
build,
set_default_style
end
creation

load,
make
feature

make (n: STRING; r: RECT; ctx: INTEGER)

make_default (n: STRING; r: RECT; ctx: INTEGER)

set_default_style

press

release

is_pressed: BOOLEAN

mark_default

mark_not_default

is_default: BOOLEAN

build (rc: RESOURCE_CONTAINER; p: POINTER)
end -- class TEXT_BUTTON

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES