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 SPLITTER
inherit

CONTROL
rename
make as c_make
redefine
on_create,
on_destroy,
on_lbutton_double,
on_lbutton_down,
on_lbutton_up,
on_mouse_move,
on_paint,
on_parent_resize,
set_default_style
end
creation

ex_make,
make
feature

make (typ: BOOLEAN; pos: REAL; fixed: INTEGER)

ex_make (typ: BOOLEAN; pos: REAL; fixed, left, top, right, bottom: INTEGER)

set_siblings (first, second: TILE)
require
not_void_children: first /= void and then second /= void

set_margins (left, top, right, bottom: INTEGER)
feature

set_default_style

on_lbutton_down (x, y: INTEGER): INTEGER

on_lbutton_up (x, y: INTEGER): INTEGER

on_mouse_move (x, y: INTEGER): INTEGER

on_lbutton_double (x, y: INTEGER): INTEGER

on_paint: INTEGER

on_create: INTEGER

on_destroy: INTEGER

on_parent_resize (w, h: INTEGER)
end -- class SPLITTER

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES