INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Status line cell with text"
project: "Visual Eiffel"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: grape
class STATUSLINE_CELL_WITH_STRING
inherit

STATUSLINE_CELL
redefine
store
end
creation

make,
make_fixed
feature

set_font (the_font: FONT)
-- Set font of text in cell
-- If Void the default font will be used
-- Call STATUSLINE.repaint when font is set.

get_font: FONT

set_text (the_text: STRING)

get_text: STRING

fit_cell_size
end -- class STATUSLINE_CELL_WITH_STRING

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES